VBA Code speichern unter

[Karsten]

Hallo zusammen.

ich habe mir einen Code zusammengebastelt. Ich möchte eine Excel-Tabelle als PDF abspeichern in ein bestimmtes Laufwerk, in einen bestimmten Ordner als PDF-Datei.
Hier mein Code: 

Sub SpeichernUnter()

Dim DateiName As String

DateiName = Range("K3") & Range("K4") & ".pdf"

Range("A1:I54") .ExportAsFixedFormat Type:"xlTypePDF, Filename:"Dateiname, Qualtiy:"xlQualityStandard, IncludeDocProperties: "True, IgnorePrintAreas: "False, OpenAfterPublish: "True
End Sub


Funktioniert nur leider nicht. Es kommt immer ein Syntax Fehler.
Hat jemand eine Idee?

[Mit001]

Hallo
Ich hab den Code auch schon verwendet. So wie du ihn eingibst geht er bei mir auch nicht, ich musste ihn mit Istgleich Zeichen schreiben, dann klappt es bei mir.

Range("A1:I54") .ExportAsFixedFormat Type:=xlTypePDF, Filename:=Dateiname, Qualtiy:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

Könnte das evt sein bei dir?

[Karsten]

Hallo 
geht leider trotzdem nicht.

[ralf_b]

Quality   heißt das und nicht Qualtiy