Wie sieht ein Code für ein Button aus, mit dem ich eine Datei als xltm speichere?
Dabei soll der Name fest vorgegeben werden, der Ordner frei wählbar.
Leider komme ich da nicht weiter...
Danke für Eure hilfe.
Gruß
Tommy
Dim Dateiname, datei
Application.DisplayAlerts = False
Dateiname = ("Testmappe.xltm")
datei = "D:\" & Dateiname
ThisWorkbook.SaveAs datei
Application.Dialogs(xlDialogSaveAs).Show (Dateiname)
ChDir "H:\Daten\MS_Vorlagen"
ActiveWorkbook.SaveAs Filename:="H:\Daten\MS_Vorlagen\blablabla.xltm", _
FileFormat:=xlOpenXMLTemplateMacroEnabled, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Wichtig dabei ist diese Angabe:Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen