HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Entdecke rund 2 Millionen Excel-Lösungen im
Forumsarchiv
Forumbeitrag
Excel-Version des Fragestellers:
2019
Erfahrungslevel des Fragestellers:
Kaum Excel/VBA-Kenntnisse
Hans-Georg
04.05.2026 20:11:56
@ JoWE
Moin JoWE,
du hast völlig recht, mit der Vermutung, dass meine Zellen sich ändern.

Liegt einfach daran, dass ich drei Dateien zu bearbeiten habe. Ankauf Schrott, Recycling und Ankauf-Verkauf.

Das macht das ganze natürlich recht unübersichtlich, wenn man meint, alle drei Dateien gleichzeitig bearbeiten zu müssen.
Nun habe ich es selbst gemerkt und mir vorgenommen nur EINE DATEI ZUR ZEIT zu bearbeiten!

Noch einmal Vielen Dank für deine Hilfe, ich werde das Makro später testen, bin heute zu müde dazu.

Mit freundlichem Gruß

Hans-Georg
Als Antwort auf diesen Beitrag
JoWE
04.05.2026 18:13:52
AW: Tabellenblatt als PDF speichern, der letzte Versuch
Hallo Hans-Georg,
das ständige Verändern der Zellen in Deinen Beiträgen, die dann das Jahr bzw. den Dateinamen enthalten
empfinde ich als sehr seltsam, denn im letzten Beispiel lauteten die Zellen noch "HU3" und "X3" (was soll das???)

Nichtsdestotrotz, das folgende Makro (mit den neuen Zellbezeichnungen) funktioniert tadellos ohne Fehlermeldungen:
'*************************************************************************************************************
Const oPfad = "C:\MGD Recycling\Rechnungen\Ankauf-Verkauf\"

Private Sub CommandButton3_Click()
Dim strFileName As String
Sheets("Rechnung").PrintOut Copies:=2, Collate:=True, IgnorePrintAreas:=False
With Sheets("Ankauf-Verkauf")
strFileName = oPfad & .Range("LM126").Text & "\" & .Range("DU93").Value & ".pdf"
MsgBox strFileName '** nur zum Testen
Sheets("Rechnung").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
strFileName, Quality:=xlQualityStandard, IncludeDocProperties:= _
True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End With
End Sub
'*************************************************************************************************************
Gruß
Jochen
Folgenachrichten
Antwort auf Beitrag erstellen
Bitte einen Anwendernamen ohne @ eingeben.
Bitte das Passwort eingeben.
Bitte eine gültige E-Mail-Adresse eingeben.
Bitte einen Betreff eingeben.
Weitere Optionen
Aktivieren, wenn die Frage/der Beitrag noch nicht beantwortet wurde und unter Listen > Offene Threads erscheinen soll.
Beispieldatei hochladen

Bitte einen Nachrichtentext eingeben.