Office: (Office 2010) pdf Export mit zusammengesetztem Dateinamen aus zwei Zellen

Hallo Forum.

Ich habe von Euch ein Makro, welches meine Excel als pdf in einen Ordner exportiert. Den Namen der pdf holt sich das Makro aus Zelle F7.
Nun möchte ich zusätzlich auch den Zellinhalt aus F9 als Namen haben. Der Name der pdf soll sich also aus dem Inhalt der Zellen F7 und F9 zusammensetzen. Am besten mit drei Leerzeichen dazwischen.


Könnt ihr mir das bitte umschreiben?

Vielen Dank



ActiveSheet.Range("q4").Value = lw_pfad
Rem MsgBox lw_pfad
ActiveWorkbook.SaveAs lw_pfad & ActiveSheet.Range("f7").Value & ".xlsm"

:)

 

Hallo,

warum passt Du den Code aus dem ersten Thread nicht entsprechend an?

 

...weil ich das nicht alleine hinkriege...

bitte nicht lachen...

 

Hallo Thomas,

keine Bange; - ums Lachen geht es hier nicht sondern um Hilfe zur Selbsthilfe. *wink.gif*

Deine Beschreibung ist für mich missverständlich (was steht genau in welchem Feld) und Dein Code passt nicht dazu. Außerdem vermeidet man besser Leerzeichen im Dateinamen.

Lade doch mal Deine Mappe inkl. Code (Inhalte ggf. anonymisiert) hier hoch, damit man nicht so raten muss.

 

Gib mir bitte Zeit bis morgen, dann komme ich wieder an die Excel ran. Bin im Feierabend.

 

Hallo Haklesoft.

Nach einigem Probieren ist es mit gelungen, das Problem zu lösen. Ich bin deinem Rat gefolgt und habe das Makro aus dem ersten Threat erweitert:




Private Sub CommandButton1_Click()
Dim ws As Worksheet

Set ws = ActiveWorkbook.Sheets("Arbeitsblatt")
'Zelle a1 Dateipfad zum Ablegen der pdf
'Zelle c8, c10 gibt den Namen der pdf
'Zelle b1 enthält ein Leerzeichen zum Trennen von Auftragsnummer und Kundenname

ws.ExportAsFixedFormat xlTypePDF, ws.Range("a1").Text & "\" & ws.Range("c8").Text & ws.Range("b1").Text & ws.Range("c10").Text
Set ws = Nothing

Unload Me




End Sub


Nun funktioniert das einwandfrei.

Danke für deine Mühe!

Gruss

nukleus

 

Hallo Thomas,

prima, dann hat die Hilfe zur Selbsthilfe ja geklappt.

Meine Empfehlung: verwende in Datei- und Verzeichnisnamen nach Möglichkeit keine Leerzeichen.
Das hat seinen Grund darin, dass bei Programmaufrufen mit Übergabe dieser Angaben als Parameter eine Trennung an eben diesen Zeichen stattfinden kann und der Aufruf dann scheitert.
Als Abhilfe dagegen hat sich Microsoft einfallen lassen, dass man den ganzen Parameter in zusätzliche doppelte Anführungsstriche einkapseln kann/muss.

Man umschifft diese Klippe aber souverän, in dem man grundsätzlich statt Leerzeichen ein Ersatzzeichen (z. B. Unterstrich) verwendet.

 

GUt, dann baue ich das noch entsprechend auf Unterstrich um. Dann ist das Makro sauber und ich weiss, dass es keine Fehler verursachen wird, die ich später lange suchen muss.

Schöne Weihnachten!