Bestimmten Drucker bei Druckmakro
29.04.2005 15:54:28
Sascha
nutze untenstehendes Makro um Bereiche einer Tabelle auszudrucken. Nun würde ich gerne dem Makro noch beibringen das er dafür immer den Drucker "JPG-Writer" nutzen soll. Ist das möglich? Danke für Die Hilfe
Gruß
Sascha
Private Sub CommandButton1_Click()
Sheets("Produktion").Select
ActiveSheet.PageSetup.CenterHeader = Sheets("Druck").Cells(3, 1).Value
ActiveSheet.PageSetup.PrintArea = "$B$2:$AF$50"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Sheets("Druck").Select
Range("A1").Select
End Sub