Tag: 条件编译

自动化错误与条件编译

当试图加载Excel工作簿时，我发现奇怪的行为。 我有一个用COM Interop编写的Excel-AddIn。 它主要用于创build我自己的Ribbon-Tab，从菜单中加载工作簿并执行一些项目pipe理。 当我尝试使用两种方法打开工作簿时，会得到不同的结果： 首先，当我从加载中加载工作簿（Excel 2003版本）时，一切正常。 从function区的Button-Event中调用openWorkbook项的公共函数openWorkbook ，该函数使用application.workbooks.open(…)加载Excel工作簿。 这样，工作簿将打开而不会出现错误。 其次，当我尝试使用如下代码从VBA中调用Addin-Function： Set addIn = Application.COMAddIns("WMExcelAddin1") Set automationObject = addIn.Object automationObject.openWorkbook (filename) 我收到一条错误消息： 编译错误 自动化错误 并且IDE在其中一个工作簿模块中首次出现有条件编译时停止，如下所示： #const ebind = 0 […] sub proc1() #if ebind = 1 then ' IDE Stops here […] #else […] #end if end sub 我试图使用布尔数据types而不是数字具有相同的效果。 我在我的智慧结束。