我想创建一个主宏文件，它在我选择的任何文件中运行宏代码

Question

我想创建一个主宏文件，该宏文件在我选择的任何文件中运行宏代码。代码只会提取数据并粘贴到新工作表或特定的选定文件中。每次我必须打开文件并运行宏。有没有可能打开文件？

Answer 1

除了使用主宏文件外，还有一种选择是使用VB脚本文件，其内容如下所示。

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 

打开记事本，粘贴上面的代码，并保存它像RunAbcMacro.vbs。

上面的代码将打开宏文件“D：\ abc.xlsm”并运行名为TestMacro1的宏，其中TestMacro1可以是“D：\ abc.xlsm”中的以下内容。

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

希望得到这个帮助！

Answer 2

如果您希望某些代码在所有工作簿中都可用，请使用PERSONAL.XLS或在Excel 2007-2016 PERSONAL.XLSB文件中使用。

查看此URL获取所有详细信息。

http://www.rondebruin.nl/win/personal.htm