Moin,
wie ich Excel veranlasse mir den Datei Speichern unter Dialog für ein PDF Dokument anzuzeigen, gelingt schon.
Auch wie ich den Inhalt einer Zelle mit in den Namensvorschlag bekomme. Es gelingt aber nicht das Datum
aus einer anderen Zelle mit als Vorschlag anzuzeigen. Immer dann wenn ich die entsprechende Zelle (C13 in meinem Code)
über & Range.... angebe wird gar nichts mehr angezeigt.
Wenn ich die Prozedur für ein Excel-Format verwende, dann wird das Datum mit vorgeschlagen.
Ich brauche aber das PDFDokument, weil es der Abschluss eines Workflows ist und dem Mitarbeitenden anzeigt, dass
sein Antrag abschließend bearbeitet wurde.
Ich suche seit Tagen im Internet nach einer Lösung, aber nichts gefunden. Es gibt bestimmt jemanden, der das Problem schon einmal gelöst hat und
mir helfen kann.
Ich verwende folgenden Code:
Dim vntReturn As Variant
vntReturn = Application.GetSaveAsFilename(InitialFileName:= _
"_" & Range("c2") & "_" & Range("d13"), _
FileFilter:="PDF-Datei (*.pdf), *.pdf)", Title:="PDF erzeugen")
If vntReturn > False Then
Call ThisWorkbook.ExportAsFixedFormat(Type:=xlTypePDF, _
Filename:=vntReturn, Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, _
OpenAfterPublish:=False)
End If