VB-Druckbefehl ohne Hintergrungfarbe.
25.02.2004 12:11:23
marc :o)
wie lautet der Druckbefehl fuer drucken ohne Hintergrundfarbe.
Ich brauche einen VBA Tipp.
marc :o)
Private Sub cmdPrint_Click()
Dim i As Integer
On Error Resume Next
Worksheets("Ges_Feh").Activate
Range("$B$1:$J$107").Select
i = MsgBox("Gedruckt wird Seite 1. bis 3. - Ges.Feh ", vbExclamation, "Druckbereich wurde festgelegt! ")
ActiveSheet.PageSetup.PrintArea = "B$1:$J$107"
ActiveSheet.PrintOut Copies:=1
Application.CutCopyMode = False
Range("J2").Select
End Sub