在Excel中通過VBA調用COM加載項

我有一個用VSTO寫的我想用VBA宏調用的COM加載項。使用加載項我需要啓動它，輸入一些文本（自動），然後運行應用程序。加載項是全部按鈕，並且我不能輕易訪問代碼，因爲它的一部分被加密（它是第三方）。令人遺憾的是，單擊此加載項時記錄函數不會執行任何活動，並且我無法將其添加到VBA上的引用列表中。我已經嘗試了幾種方法來做到這一點，但迄今爲止還沒有任何工作。在Excel中通過VBA調用COM加載項

謝謝你的幫助！

- 尼克

因爲這是我的代碼。正如所寫的，它在第二行到最後一行代碼上引發了運行時錯誤91代碼。如果我在最後一行列表的周圍添加括號，則會出現語法錯誤（預期：=）。我不確定這個問題是什麼？

Sub Test() 
    Dim addIn As COMAddIn 
    Dim automationObject As Object 
    Dim SQL_CODE As String 
    Dim PW As String 
    Dim Name As String 
    Set addIn = Application.COMAddIns("Orion2010") 
    SQL_CODE = "SELECT startdatetime, tli, serialnumber, keyname FROM vmfgoperationdata WHERE serialnumber in ('90102072B030H' , '90102072003BF') and operationname = 'Part Scanning')" 
    PW = "password" 
    Name = "na\npiotrowski" 
    Set automationObject = addIn.Object 
    automationObject.Utility.RefreshData Name, PW, SQL_CODE 
End Sub

來源

2012-09-11 user1662706