PrintOut
05.03.2004 09:30:32
Norbert
mit folgendem Programm lasse ich mir eine Seite ausdrucken:
Private Sub CommandButton6_Click()
Worksheets("sheet1").Range("A1:L36").Interior.ColorIndex = xlNone
ActiveSheet.PrintOut From:=1, To:=1
Unload Me
End Sub
Da ich Zellen mit Hintergrundfarben habe, habe lasse ich diese mit
Worksheets("sheet1").Range("A1:L36").Interior.ColorIndex = xlNone
ausblenden.
Geht das auch besser?
Ich will ohne Hintergrundfarben drucken?
Oder wie bekomme ich die hinterher wieder bunt?
Danke Norbert
Anzeige