Hallihallo,
ich habe ein kleines VBA Problem, bei dem ich einfach nicht mehr weiterkomm...Google konnte mir leider auch nicht helfen
Folgendes Problem - In der Firma habe ich eine kleine Excel Datei mit 2 Arbeitsblättern. In Arbeitsblatt 1 trage ich ein paar Zahlen, Chargennummer und ein Datum ein. Sind alle Daten richtig eingegeben, drücke ich auf eine Schaltfläche/Button mit zugewiesenem Makro. Das "einfache" 3-Zeilen Makro ist so aufgebaut, dass es mir Arbeitsblatt 2 ausdrucken soll, wobei ich zuerst den Drucker auswählen will/kann/soll:
Sub ProFormaDruck()
'
' ProFormaDruck Makro
' Einfaches Druckmenü --> Application.Dialogs(xlDialogPrinterSetup).Show
' Druckereinstellungen --> Application.Dialogs(xlDialogPrint).Show
If Application.Dialogs(xlDialogPrint).Show = True Then
Sheets("ProFormaIV").PrintOut Copies:=1
End If
End Sub
Alles anzeigen
Standardmäßig wird dieses Arbeitsblatt per "CutePDF" als PDF abgespeichert.
Das Problem ist, dass sobald ich die Schaltfläche "Als PDF speichern" anklicke, das "Speichern unter" Fenster von Cute PDF zweimal hintereinander auftaucht:
- Schaltfläche/Button anklicken - CutePDF printer auswählen - Fenster "Speichern unter" als PDF - "Speichern" anklicken - PDF wird gespeichert - Fenster "Speichern unter" erscheint erneut ein 2x
Kann ich das 2x erscheinen des "Speichern unter" Fenster verhindern/unterdrücken/deaktivieren? Wenn ja, wie?
Bin für jede Hifle dankbar!