Ich habe folgenden Code, der zum Speichern Unter dient:
Dim SaveAsDlg As FileDialog
Set SaveAsDlg = Application.FileDialog(msoFileDialogSaveAs)
With SaveAsDlg
.InitialView = msoFileDialogViewList
.InitialFileName = "G:\Bestellspezifikation_" & Cells(4, 2)
'=Vorschlag für Dialog"
.FilterIndex = 25 'PDF Format
.Show
.Execute
End With
Leider habe ich das Problem, dass die Datei sofort nach dem Abspeichern mit Excel geöffnet wird und meine Originaldatei verlassen wird. Und wenn ich, nachdem ich Excel geschlossen habe, dann die abgespeicherte PDF öffnen will, dann sagt er mir, dass die PDF nicht geöffnet werden kann mit ADOBE. Ich vermute, dass er die PDF mit Excel-Referenz abspeichert.
Was ich möchte:
Die PDF soll abgespeichert werden und NICHT mit Excel geöffnet werden nach der Prozedur. Die abgespeicherte PDF soll natürlich mit dem Reader geöffnet werden können, was zurzeit nicht geht.
Wie muss ich den Code abändern?
Vielen Dank im Vorraus,
Ben Dover