根据你的图片,要实现按钮查询功能,其实很简单。
首先,右键点击查询汇总按钮,选择【指定宏】;
然后,在弹出的VBA界面中,输入以下代码:
Sub 查询汇总()
'定义接口变量
Dim obj As Object
'获取通用Excel 的编程接口
Set obj = Application.COMAddIns.Item("prjAddin.Office_Addin").Object
'通过接口调用表间取数公式
obj. execFormula "查询汇总"'这里输入你设置的表间取数公式的名称
'释放编程接口
Set obj = Nothing
End Sub
最后,保存退出VBA编辑器,右键按钮,选择VBA名称即可。