Access中的VBA调用函数答案

【问题标题】：VBA Call Function in AccessAccess中的VBA调用函数
【发布时间】：2020-07-13 22:54:12
【问题描述】：

是否可以使用 VBA 在访问中使用“调用函数”在 Excel 中执行宏？我正在尝试使用 Access 中的 VBA 函数来格式化数据。

【问题讨论】：

【解决方案1】：

是的，有可能。

这是一个例子：

Sub RunExcelMacro()
Dim xl As Object
'Step 1:  Start Excel, then open the target workbook.
    Set xl = CreateObject("Excel.Application")
    xl.Workbooks.Open ("C:\Book1.xlsm")

'Step 2:  Make Excel visible
    xl.Visible = True

'Step 3:  Run the target macro
    xl.Run "MyMacro"

'Step 4:  Close and save the workbook, then quit the Excel application
    xl.ActiveWorkbook.Close (True)
    xl.Quit

'Step 5:  Memory Clean up.
    Set xl = Nothing

End Sub

【讨论】：

谢谢！效果很好！现在唯一的问题是，我从关闭它开始，因为我的老板想要尽可能多的自动化。当我运行你给我的代码时，它会在宏执行后立即关闭 wb。请指教。