Makro ausführen ohne Excel
- .vbs-Datei erstellen
- Variable in Visual Basic Script (VBS) definieren
- Excel-Applikation mit VBS starten und beenden
- Sichtbarkeit der Excel-Applikation in VBS setzen
- Pfad einer Datei auslesen
- VBA-Makro mit VBS ausführen
- Textdokument in .vbs-Datei umwandeln
- Excel-Datei mit VBS speichern
- Erfolgs-Nachricht für den Nutzer mit VBS erzeugen
- DisplayAlerts unterdrücken
Code (Visual Basic Script)
'Excel-Applikation starten
Set xlsApp = CreateObject("Excel.Application")
'Sichtbarkeit setzen
xlsApp.Visible = False
'Excel-Datei auswählen
Set xlsWb = xlsApp.Workbooks.Open("C:\Users\kaiwe\Desktop\Makro ohne Excel.xlsm")
'Makro ausführen
xlsApp.Run("OrdnerstrukturAnlegen")
xlsApp.Run("TabellenblattKopieren")
'Excel-Datei speichern
xlsApp.DisplayAlerts = False
xlsWb.Save
'Excel-Applikation beenden
xlsApp.Quit
MsgBox "Die Aufgabe wurde erfolgreich durchgeführt"
