Makro funktioniert nicht.
05.03.2016 08:55:35
Sven
ich arbeite immer noch an meinen Dienstplan damit der so eifach wie möglich wird.
Dazu habe ich auf jedem Monat ein Button, der bei klick das aktuelle Tabellenblatt als PDF speichern soll.
Hierzu öffnet sich ein Fenster und man kann den Speicherort und den Namen wählen .
Jedoch wenn ich auf Speichern klicke und bestätige , erscheint im gewünschten Ordner keine neue Datei .
Findet jemand den Fehler ?
Sub Schaltfläche1_BeiKlick()
Sheets ("Januar").Activate
fileSaveName = Application.GetSaveAsFilname ( _
fileFilter:="PDF Files (*.pdf), *.pdf")
If fileSaveName False Then
MsgBox "Save as " & fileSaveName
End If
End
Sub
Vielen dank schonmal im Voraus :-)
LG
Sven
Der nächste Button wird ein Button zum werte exportieren aus der Vorgängerversion , da fummele _
ich gerade noch mit dem Makro Recorder. :-)
Anzeige