Clever-Excel-Forum

Normale Version: VBA
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo, VBA Experten,

mit dem folgenden VBA Code wird eine PDF-Datei erstellt und der Datei Name aus der Zelle "B4" und "C4"
ausgelesen. In "B4" steht das Datum "HEUTE()" , das Zellenformat ist "M", also Monatsname als Zahl weil
die erstellten PDF's jeden Monat nacheinander abgespeichert werden, bis jetzt habe ich das händisch angepasst.
Der Code gibt den Dateinamen 28.11.2022 November aus, lieber wäre mir wenn der Name 11 November ausgegeben würde.
Da muss natürlich die passende Formatierung mit in die Syntax, ich bekomme es aber nicht hin.
Vielleicht kann mir ja einer den richtgen Code hierfür nennen.
Vielen Dank aus dem schönen Rheinland
Gruß Jo  Undecided

Selection.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
      "D:\Test-Ordner\Test Auszüge 2021\2022\" & Range("B4") & " " & Range("C4") & ".pdf" _
        , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
        :=False, OpenAfterPublish:=True
Hallo,

statt Range("B4") nimmst Du:
Code:
Format(Range("B4").Value, "mm mmmm")
Hallo


ungetestet:

Code:
"D:\Test-Ordner\Test Auszüge 2021\2022\" & Format(Range("B4"), "M MMMM") & " " & Range("C4") & ".pdf" _

LG UweD
Hallo ihr Beiden,
vielen Dank für Eure Vorschläge, bin im Moment nicht am Rechner (am Tablett) kann es hier nicht testen. Sobald ich am Rechner bin werde ich das mal probieren und gebe dann Rückmeldung.

Danke und Grüsse vom Jo
Hallo und einen guten Morgen,

@Steuerfuzzi
@UweD

herzlichen Dank,
die erstellte PDF wird gespeichert mit den Datumswerten aus den Zellen, so habe ich mir das gedacht.
Prima wieder ein paar Klicks eingespart.    19

Lg Jo