ich hab schon in der Recherche gesucht und dazu einiges gefunden, aber es funzt einfach nicht.
Ich moechte, dass beim PDF erstellen autom. die Datei benannt wird.
Immer wenn ich den Code ausfuehre, dann bringt er mir trotzdem ein Fenster wo ich den Dateinamen angeben soll.
Datname = "c:\temp\rp" & Now() & ".pdf" Sheets(worksheet_name).Activate
Application.ActivePrinter = "Acrobat Distiller on Ne00:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:="Acrobat Distiller on Ne00:"
SendKeys Datname, True
SendKeys "{enter}"
Danke
Sven