Office: (Office 365) Datei als PDF speichern ohne festen Dateipfad

Hey ihr Profis da draußen,

ich versuche aktuell mehrere Excel-Blätter über VBA automatisch als PDF-Datei erstellen zu lassen. Einen Teilerfolg konnte ich bereits erzielen, mehrere Blätter werden zu einer PDF-Datei zusammengefügt, ich habe es aber nur geschafft, dass die neue Datei an einer bestimmten Stelle gespeichert wird. Wenn ich das richtig gesehen habe, kann man auch einstellen, dass kein fester Pfad vorgegeben wird, sondern man einen Speicherplatz beim Erstellen wählen kann. Kann mir hier einer weiterhelfen? Im Folgenden mein aktueller Code:

Sub PDFerstellen()

Sheets(Array("Übersicht", "Nord", "Mitte", "Süd")).Select
ActiveSheet.ExportAsFixedFormat _
Type:=xlTypePDF, _
Filename:="C:\Users\GreenWizard\Desktop\Übersicht\Übersicht2023.pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True

End Sub

Besten Dank im Voraus für eure Hilfe!

 

Hallo,
Zb.
In Zelle A1:

Code:

"C:\Users\GreenWizard\Desktop\Übersicht\Übersicht2023.pdf"

Filename:= range("A1").value, _