Microsoft Excel

Herbers Excel/VBA-Archiv

Tabelle drucken

Betrifft: Tabelle drucken von: Erich Müller
Geschrieben am: 05.09.2004 21:50:04

Hallo,
ich habe eine "open end"-Tabelle von A1:G1000. Die Wiederholungszeilen oben sind 1:4. Die eigentliche Druckbereich ist von A5:G1000.
Da immer nur bis zur letzten ausgefüllten Zeile ausgedruckt werden soll, lege ich den Druckbereich jeweils manuell fest. Das ist mir auf Dauer zu lästig.
Gibt es dafür ein Makro ?
Gruß Erich Müller

  


Betrifft: AW: Tabelle drucken von: rolf
Geschrieben am: 05.09.2004 21:55:22

hallo erich
ist aus dem forum
' DIE DATEI WIRD GEDRUCKT
Sub DRUCKENDERDATEI()
If ActiveSheet.Name = "H I L F E" Then Exit Sub
hRow = [A65536].End(xlUp).Row                       'Ermitteln der letzten belegten Zeile in Spalte A
ActiveSheet.PageSetup.PrintArea = "$A$1:$G$" & hRow 'Druckbereich festlegen
ActiveSheet.PrintOut Copies:=1, Collate:=True       'Drucken
End Sub


rolf


  


Betrifft: AW: Tabelle drucken von: Erich Müller
Geschrieben am: 05.09.2004 22:02:42

Hallo rolf,
Danke für Deine Hilfe.
Willst Du mich mit dem Forum "veräppeln", oder wie komme ich da dran ?
Gruß Erich Müller


  


Betrifft: AW: Tabelle drucken von: rolf
Geschrieben am: 05.09.2004 22:09:22

hallo erich

ich wollte dich nicht veräppeln, sondern damit sagen das ich das hier im forum gefunden habe.

ich schick dir gleich noch eine datei.

rolf


  


Betrifft: AW: Tabelle drucken von: Erich Müller
Geschrieben am: 05.09.2004 23:05:55

Hallo rolf,
Deine noch zu erwartete Datei kann ich mir erst morgen früh ansehen.
Ich mach die Kiste jetzt aus. Gute Nacht.
Erich Müller


  


Betrifft: AW: Tabelle drucken von: rolf
Geschrieben am: 05.09.2004 22:22:06

hallo erich

hier die testdatei

https://www.herber.de/bbs/user/10548.xls

gruss rolf


  


Betrifft: AW: Tabelle drucken von: Erich Müller
Geschrieben am: 05.09.2004 23:10:28

Hallo rolf,
habe die Datei jetzt erst gesehen. Entschuldigung und vielen Dank.
Gruß Erich Müller


  


Betrifft: AW: Tabelle drucken von: rolf
Geschrieben am: 05.09.2004 23:13:56

hallo erich

ich hoffe das ist das was du gesucht hast

rolf


  


Betrifft: AW: Tabelle drucken von: Erich Müller
Geschrieben am: 06.09.2004 07:28:10

Hallo rolf,
genau das habe ich gesucht.
Danke
Erich Müller


 

Beiträge aus den Excel-Beispielen zum Thema "Tabelle drucken"