Noch mal If Makro (bitte berichtigen)
19.01.2004 13:16:14
Markus H.
ich nochmal.
kann mir bitte jemand dieses script richtig machen?
Sub Makro1()
if A1 = 1 Then Then ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
else if A1 = 2 Then ActiveWindow.SelectedSheets.PrintOut Copies:=2, Collate:=True
else MsgBox = "Kein Ausdruck möglich"
End Sub
ist mein jämmerlicher versuch eines scripts.. aber ich geb mir mühe.. ^^
MfG
Markus