einfaches druckmakro
06.06.2006 16:28:12
dieter
ich habe mir per makrorecoder das untenstehende makro gebastelt.
Wenn dieses Makro auf eurem rechner laufen soll,
wird es vermutlich probleme mit der druckerfindung geben.
Gibt es eine zuweisung,mit der das makro den jeweiligen defaultdrucker selbst wählt / findet?
danke und gruss
dieter
hier das makro:
Sub Blatt_drucken()
' Blatt_drucken Makro
' Makro am 06.06.2006 von mir aufgezeichnet
Range("B2:J40").Select
ActiveSheet.PageSetup.PrintArea = "$B$2:$J$40"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub