Question

通用Excel做的汇总表，怎么实现用按钮查询？

正在用上海互和信息科技有限公司的通用Excel做我们公司的CRM系统，现在做了一个汇总表，请问怎么实现用按钮查询？

Answer 1

根据你的图片，要实现按钮查询功能，其实很简单。

 

首先，右键点击查询汇总按钮，选择【指定宏】；

然后，在弹出的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名称即可。