Druck bis zur letzten Zeile
04.09.2003 18:57:15
Erich M.
ich habe mit dem Recorder nachstehenden Code aufgezeichnet.
Wie kann ich bewerkstelligen, dass der ausgewählte Bereich
in der Zeilenlänge immer bis zur letzten gefüllten Zelle
in Spalte B ausgewählt wird.
Die Breite bis Spalte S bleibt immer gleich:
Sub Makro1()
Range("A1:S15").Select
Selection.PrintOut Copies:=1, Collate:=True
Range("M5").Select
End Sub
Besten Dank für eine Hilfe!
mfg
Erich