Excel Zeilen weisses drucken

[Nud3l]

Hi ich möchte gerne aus einem Worksheet nur bestimmte zeilen aus drucken und dann auch nur bis G

Dafür lege ich jedes mal ein neuen Worksheet an wo ich dann probiere es neu zu füllen mit den passenden Inhalt aber igendwie klappt das alles nicht..

tempsheet.Range("A2").Value = "Hallo"

tempsheet.Range("A1").Value = Range("A11").Value

Die erste Zuweisung klappt die 2. nicht

For Each rngZellwert In Range("H12:H23")
If Not rngZellwert.Value = "" Then
i = i + 1
'tempsheet.Cells("Ai:Gi").Value = rngZellwert
End If

So sollte es mal funktoineren aber ich raff das irgendwie noch nicht

 

[tombe]

Sind die Zeilen die du drucken willst fortlaufen, also Zeile 1, 2, 3, 4 oder Zeile 11, 12, 13, 14 oder sind da Lücken dazwischen

Wenn es ein durchgehender Bereich ist kannst du doch auch den Druckbereich über das Menü festlegen: "Datei" -> "Druckbereich" -> "Druckbereich festlegen".

Gruß Thomas

 

[Nud3l]

Also es kann sein das ich zeile 12, 13, 17, 18, 19, 43, 112 drucken möchte meistens sind es noch mehr glücken

Axo und das läuft dann über einen Button den ich eingebaut habe

 

[tombe]

Und gibt es ein bestimmtes Kriterium nachdem du die zu druckenden Zeilen auswählst, dann könntest du auch mit AutoFilter arbeiten

Beschreib doch mal etwas genauer wie die Tabelle aussieht und was du genau machen willst/musst. Dann findet sich bestimmt eine Lösung.

Gruß Thomas