Datei laden/Blatt aktivieren mit VBS/VBA
28.02.2005 21:18:06
Christian
Hallo zusammen!
Ich habe ein Problem mit einem Excel-Makro. Ich möchte zwei Excel Files öffnen. Die eine Datei ist eine Daten-Datei, die automatisch generiert wird. Die zweite Datei enthält Makros und Formatvorlagen, mit der eine neue Datei aus der Datendatei erstellt wird.
Dieses funktioniert auch, wenn ich das Makro manuell starte.
Zum Öffnen benutze ich:
Dim wb As Excel.Workbook = _
ThisApplication.Workbooks.Open("C:\YourPath\YourWorkbook.xls")
Zum Aktivieren:
ThisApplication.Workbooks("file.xls").Activate
Das Makro soll allerdings aus einem VBScript gestartet werden. Ich kann auch das Makro mit Parameter aufrufen, allerdings ist es nicht möglich eine andere XLS-Datei zu öffnen und zu aktivieren. Selbst ein anderes Blatt aus dem gleichen Workbook, in dem sich das Makro befindet, lässt sich nicht aktivieren.
Zum Starten des Makros aus dem VBScript nutze ich:
Dim XL as Object
Set XL = CreateObject("Excel.Application")
XL.Workbooks.Open "C:\My Documents\ExcelFile.xls"
XL.Run "Module1.TestMacro ""parameter1"", ""parameter2"""
Hat jemand eine Ahnung, warum das Laden von Dateien und Aktivieren von Worksheets nicht funktioniert, wenn das Excel-Makro aus einem VBScript aufgerufen wird?
Viele Grüße,
Christian