Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1848to1852
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

VBA - PDF erstellen aus anderer Mappe

VBA - PDF erstellen aus anderer Mappe
21.09.2021 12:18:19
flo4711
Hallo,
ich habe mal wieder ein kleines Problem und zwar beim Erstellen einer PDF-Datei über die Exportieren-Funktion.
Folgendes Szenario:
Im Rahmen einer Verarbeitung wird per VBA eine andere Arbeitsmappe geöffnet und aktualisiert.
Ich möchte jetzt von dieser geöffneten Mappe eine PDF-Datei mit allen Tabellenblättern erstellen.
In dieser Mappe gibt es hierfür folgendes Makro, dass auch zum gewünschten Ergebnis führt, sofern man es direkt aus dieser Mappe aufruft:

Sub PDF_Export()
' Speichern als PDF
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Left(ThisWorkbook.FullName, Len(ThisWorkbook.FullName) - 4) & "pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
end Sub
Rufe ich diese Makro aus meiner anderen Mappe auf, so erhalte ich immer nur ein leeres PDF:

Application.Run "'" & wbOpen.Name & "'!PDF_Export"
Wie müsste hier eine Verarbeitung aussehen, dass ich auch so zum gewünschten Ergebnis komme?
Vielen Dank im Voraus!
Gruß Gode

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA - PDF erstellen aus anderer Mappe
21.09.2021 12:28:14
Rudi
Hallo,
anstatt Application. Run ....

wbOpen.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Left(wbOpen.FullName, Len(wbOpen.FullName) - 4) & "pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
Gruß
Rudi
AW: VBA - PDF erstellen aus anderer Mappe
21.09.2021 12:36:43
flo4711
Hallo Rudi,
vielen Dank erstmal für deine Antwort.
Das war eigentlich auch mein erster Ansatz, bevor ich das Makro in die andere Mappe "ausgelagert" habe.
Leider habe ich hier das gleiche unbefriedigende Ergebnis ... es wird eine leere pdf-Datei exportiert :-(
Gode
Anzeige
AW: VBA - PDF erstellen aus anderer Mappe
21.09.2021 13:26:57
Rudi
das funktioniert bei mir:

Sub test()
Dim wbOpen As Workbook
Set wbOpen = Workbooks.Open("c:\temp\testmappe.xlsx")
With wbOpen
.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=Left(.FullName, Len(.FullName) - 5), _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
.Close False
End With
End Sub
Gruß
Rudi
AW: VBA - PDF erstellen aus anderer Mappe
21.09.2021 14:23:39
flo4711
Hallo Rudi,
es ist manchmal schon sonderbar.
Wenn ich dein test-Makro oben so aus meiner Excel-Datei abrufe: pdf-Datei wie gewünscht
Baue ich den völlig identischen Code in mein Verarbeitungsmakro ein: leere pdf
Rufe ich das Test-Makro aus meiner Prozedur auf: leere pdf
Ich habe es jetzt nur über den Workaround zum Laufen gebracht, dass ich vor dem PDF-Export wbOpen schließe und danach gleich wieder öffne ... dann passt auch alles.
Ich habe keine Ahnung warum (vll. jemand aus dem Forum?!) ... aber erstmal ok, dass ich eine Lösung habe.
Vielen Dank nochmal Rudi!
Gruß Gode
Anzeige

311 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige