excel - vba，excel - 使用 xls 文件检测其中是否有宏？

Question

有谁知道一种编程方法来确定 Excel 文件是否包含宏？我有数百个 Excel 文件，我需要知道哪些文件中有宏？

Answer 1

我已经尝试过 2 个工作簿(其中一个有宏，另一个没有宏)。

Application.AutomationSecurity = msoAutomationSecurityForceDisable

Workbooks.Open("c:\temp\myfileWithMacros.xls")
Msgbox ActiveWorkBook.HasVBProject
ActiveWorkBook.Close

Workbooks.Open("c:\temp\myfileWithoutMacros.xls")
Msgbox ActiveWorkBook.HasVBProject
ActiveWorkBook.Close

希望有帮助。