Herbers Excel/VBA-Archiv

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

Speicherort PDF

• Speicherort PDF von Werner Meinke vom 16.09.2019 08:32:49
• AW: Speicherort PDF - von Regina Resch-Jansen am 16.09.2019 08:38:35
• AW: Speicherort PDF - von Werner Meinke am 16.09.2019 08:46:56

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.