EXCEL如何用VBA实现多条件查询数据？

1、以商场2015年第一季度电器销售统计为例子，“产品”、“品牌”、“月份”3个条件的销售额进行查询。

2、假设要查询“康佳”的“1月”份“各类家电”的销售额，先建一个对应列的工作簿。如图，输入条件1：“成品名称”，条件2:“品牌名称”，条件3：“月份”，

3、下面到了建立宏的步骤：单击菜单栏中的“开发工具”——插入——表单控件——按钮，在出现的十字箭头上拖住画出一个按钮，如图所示。

4、在d出的查找红对话框中选择“录制”，在d出的“录制新宏”对话框中，修改宏名称为“查找”，单击确定。

5、单击“开发工具”——查看代码，打开VBA编辑器，如图所示。

6、在VBA编辑器点击插入-模块，如图，

7、现在来输入代码：

Sub查找()

DimiAsInteger,jAsInteger

arr1=Sheets("数据").Range("A2:D"&Sheets("数据").Cells(Rows.Count,"A").End(xlUp).Row)

arr2=Sheets("查找").Range("A2:D"&Sheets("查找").Cells(Rows.Count,"A").End(xlUp).Row)

Fori=1ToUBound(arr2)

Forj=1ToUBound(arr1)

Ifarr2(i,1)=arr1(j,1)Andarr2(i,2)=arr1(j,2)Andarr2(i,3)=arr1(j,3)Then

arr2(i,4)=arr1(j,4)

GoTo100

EndIf

Next

arr2(i,4)=""

100:

Next

Sheets("查找").Range("A2:D"&Sheets("查找").Cells(Rows.Count,"A").End(xlUp).Row)=arr2

EndSub

8、现在回到EXCEL表格，右击按钮，选择“编辑文字”，修改按钮名称为“统计”。

9、那么就完成了。

这里介绍一种非常高效的方法。就是借助Excel插件SqlCel，这个插件在处理数据上面有很多可取之处，非常值得学习。

比如在Excel中有一个订单ID字段，这个字段总共有2千条记录，现在我们要查询这些订单对应的产品名称。

在Mysql数据库中有一张订单表里面存储了所有订单的详细信息。我们该怎样 *** 作才能最快速地查到每个订单的产品名称呢？

多数人的做法应该是把Excel中的数据导入到Mysql中，然后写一个SQL语句匹配订单表，然后把匹配结果再导出来。这种做法也是可以的，只是非常不方便，单是数据的导入可能就会遇到不少麻烦。用SqlCel处理这个问题就简单了

插件安装之后需要连接到Mysql数据库，点击“数据库连接”下的Mysql，输入连接信息。如下：

连接到数据库之后，点击“SQL查询”进入数据查询编辑器。

这个编辑器和我们平时使用的编辑器一样，可以高亮显示，智能提示，选取执行。同时它还有很多特别的地方，比如定义变量，引用变量、引用Excel单元格、指定数据的来源和去向等。这里我们要说的是它的一个函数RNGTOSTR，这个函数用来将Excel单元格的值转为字符串并拼接到SQL语句中。我们在编辑器中写SQL语句如下：

SELECT DISTINCT PRODUCT_NAME,PRODUCT_ID FROM ORDER_TABLE WHERE PRODUCT_ID IN ('rngtostr([Sheet1!A1:A1000],'\,',true)')

这样一个SQL语句就可以把每一个产品ID对应的产品名称查询到当前Excel中了。

这里面用到了一个函数rngtostr，放一张官网的截图看一下具体的用法

---