ich habe ein makro geschrieben das automatisch ein paar workbooks öffnet u. teilweise auch ausfüllt. soweit so gut nur jetzt möchte ich eine meldung einbauen die abfragt ob gedruckt werden soll u. dann eben druckt o. nicht hab es mit dem recorder probiert u. hier im forum nachgesehen u. mir folgendes ausgedacht:
If MsgBox("Drucken", vbQuestion + vbYesNo) = vbYes Then
MsgBox "ja"
Windows.("Stundenliste1").Activate
sheets.(date).Printout
Windows.("Stundenliste2").Activate
sheets.(date).Printout
Windows.("Stundenliste3").Activate
sheets.(date).Printout
Windows.("Stundenliste1").Activate
sheets.(date).Printout
Else
MsgBox "nein"
End If
nur leider funktioniert es nicht.
date ist eine Variable in der das Aktuelle Sheet(geordnet nach Datum) speichert
weiß irgendjemand wie es funktionieren könnte???
Dank schonmal im Vorraus
mfg
snoopyi