2016-06-21 4 views

Antwort

0

Anstatt eine Master-Makrodatei zu verwenden, besteht eine Option darin, eine VB-Skriptdatei mit dem unten angegebenen Inhalt zu verwenden.

Option Explicit 

On Error Resume Next 

ExcelMacroExample 

Sub ExcelMacroExample() 

    Dim xlApp 
    Dim xlBook 

    Set xlApp = CreateObject("Excel.Application") 
    Set xlBook = xlApp.Workbooks.Open("D:\abc.xlsm", 0, True) 
    xlApp.Run "TestMacro1" 
    xlApp.Visible = True 

    xlApp.Quit 

    Set xlBook = Nothing 
    Set xlApp = Nothing 

End Sub 

Öffnen Sie den Editor, über Code einfügen und es so etwas wie RunAbcMacro.vbs speichern.

Oberhalb des Codes wird die Makrodatei "D: \ abc.xlsm" geöffnet und das Makro mit dem Namen TestMacro1 ausgeführt, wobei TestMacro1 in "D: \ abc.xlsm" Folgendes enthalten kann.

Public Function TestMacro1() As Boolean 
    MsgBox "InTestMacro1" 
    TestMacro1 = True 
End Function 

Hoffe diese Hilfe!

Verwandte Themen