Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Speicherort PDF


Betrifft: Speicherort PDF von: Werner Meinke
Geschrieben am: 16.09.2019 08:32:49

Schönen guten Morgen,

hier mal ein Stück Code von mir:

    strPfad = ActiveWorkbook.Path & "\"
  ...
  
  ...
      Worksheets("temp").Activate
      MsgBox strPfad & "" & ActiveWorkbook.Path
      ChDir strPfad
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
      Filename:="Abschluss", _
      Quality:=xlQualityStandard, _
      IncludeDocProperties:=True, _
      IgnorePrintAreas:=False, _
      OpenAfterPublish:=True
  ...
  
  ...
    Application.DisplayAlerts = False
    Workbooks("Sachkonten.xlsx").Worksheets("temp").Delete
    Application.DisplayAlerts = True
  
Kann mir jemand sagen, warum die erstellte PDF-Datei nicht im vorgesehenen Ordner gespeichert wird, sondern im Benutzer-Ordner? Der MsgBox-Befehl gibt den korrekten Pfad aus.

Gruß
Werner
  

Betrifft: AW: Speicherort PDF von: 1713240.html
Geschrieben am: 16.09.2019 08:38:35

Hi versuchs mal so:

...
Filename:=strPfad & "Abschluss"
...

der reine Verzeichniswechsel reicht evtl. nicht.

Gruß
regina

  

Betrifft: AW: Speicherort PDF von: 1713245.html
Geschrieben am: 16.09.2019 08:46:56

Hey, das war's. Super vielen Dank. Echt simpel der Fehler. Bisher hatte es bei mir immer so ohne Pfadangabe geklappt.