Forums Neueste Beiträge
 

Anzahl Ausdrucke über MsgBox steuern

16/07/2009 - 23:14 von Boris Helm | Report spam
Hallo zusammen,

für die VBA Profis sicherlich ein Kinderspiel, aber ich schaffe es irgendwie
im Moment nicht.

Ich habe ein Makro, dass mir diverse Ausdrucke anstösst. Jetzt steht in den
einzelnen Zeilen auch immer die Anzahl der Ausdrucke, also in etwa ...
Printout.Copies = 1

Wie kann ich nun Žzu Beginn des Makros eine MsgBox erstellen die nach dieser
Anzahl der Ausdrucke, also in unserem Fall 1, fragt und diese anpasst?

Danke und Gruß
Boris
 

Lesen sie die antworten

#1 Andreas Killer
16/07/2009 - 23:23 | Warnen spam
Boris Helm schrieb:

Wie kann ich nun Žzu Beginn des Makros eine MsgBox erstellen die nach
dieser Anzahl der Ausdrucke, also in unserem Fall 1, fragt und diese
anpasst?


Ich glaub das erklàrt sich von selbst:

Sub Test()
Dim Count As String
Count = InputBox("Anzahl Ausdrucke?")
If Count = "" Then
'User hat Abbruch angeklickt
Exit Sub
End If
ActiveSheet.PrintOut Copies:=Count
End Sub

Andreas.

Ähnliche fragen