Hallo zusammen,
erst mal wünschen ich allen Fachfrauen- und Männern,
ein gesundes neues Jahr.
Endlich habe ich mal wieder ein Problem.
Ich habe diese Makro Zeilen:
hier werden vorher noch einige Änderungen durchgeführt, deshalb die folgenden 3 Zeilen.
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=strPath
ActiveWorkbook.Close

'--- hier wird die geänderte und gespeicherte Datei wieder geöffnet, damit man diese als PDF speichern kann ----------
Workbooks.Open Filename:=strPath
Application.DisplayAlerts = False
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF
leider wird die gespeicherte Datei nicht in das selbe Verzeichnis, wie die Ursprungsdatei mit strPath gespeichert wurde.
Wenn ich so speichere:
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=strPath
wird die Datei ins RICHTIGE Verzeichnis kopiert aber mit "xlsm" und PDF Endung
a bbb Rg.-Nr. 23 - 11 Ko.xlsm.pdf
Was mach ich Falsch ?
mfg
kurt k