|
Hallo Gemeinde!
Ich als Anfänger hänge an einem simplen Problem und komme auch mit Hilfe des Internets nicht weiter. Daher meine Bitte an euch:
Ich möchte eine Datei in Excel als PDF speichern. Dazu muss ich einen Pfadnamen mit 2 Variablen auswählen. mein Ansatz ist dieser:
Private Sub Speichern()
ActiveSheet.Range("A1:H29").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"\\...\###Stellungnahmen\" & Range("C23") & " " & Range("F23) & "\" & "5.1_" & Range("H2") & "_I_" & "Prüfung_Harte Kriterien_" _
& Range("A29") & ".pdf", OpenAfterPublish:=False
...
Range("C23") und Range("F23") besteht aus Text. und genau an dieser Stelle hängt er sich auf. Wo übersehe ich da etwas!?!?!?
Alternativ habe ich dies probiert:
Private Sub Speichern()
Dim Az As String
Dim AntrS As String
Az = Range("C23").Value
AntrS = Range("F23").Value
ActiveSheet.Range("A1:H29").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"\\...\###Stellungnahmen\" & Az & " " & AntrS & "\" & "5.1_" & Range("H2") & "_I_" & "Prüfung_Harte Kriterien_" _
& Range("A29") & ".pdf", OpenAfterPublish:=False
...
Vielen Dank für eure Hilfe im Voraus
Christian
|