大家好，我是涂涂
今天涂涂给大家说说SQL，何为SQL呢？
SQL，即结构化查询语言(StructuredQueryLanguage)的简称，是一种特殊目的的编程语言，是一种数据库查询和程序设计语言，用于存取数据以及查询、更新和管理关系数据库系统。
SQL极大的灵活性和强大的查询功能，是我们不应错过的查询利器。
今天涂涂给大家分享下如何在Excel中通过VBA方法来使用SQL语句进行数据的查询。
问题：
从数据源工作表中，查找中文名称为“万用表”的数据，并将这些万用表的【中文名称】、【型号】、【管理编号】信息导入到结果表工作表中。
步骤1
◆在VBE编辑器中，选中左侧工程管理器中的结果表，右键插入模块
◆双击新建的模块，在右侧的代码区域输入下记代码，保存，关闭VBE编辑器
代码：
SubSQL_01()DimConnAsObjectDimRstAsObjectDimSQL,VerAsStringDimiAsLongSetConn=CreateObject("")SetRst=CreateObject("")="provider=;ExtedProperties=;Datasource="'Excel2007以上版本'**********************************************************************************SQL="Select中文名称,型号,管理编号from[数据源$]where中文名称='万用表'"'**********************************************************************************SetRst=(SQL)Fori=0(1,i+1)=(i).NameNextiRange("A2").=NothingSetRst=NothingSub步骤2
◆在表格空白处，拖动鼠标画一个矩形，然后指定宏即可
效果图：
修改查询条件：
◆按Alt+F11打开VBE编辑器，修改代码中的SQL语句
例如：需要提取中文名称为“万用表”的所有信息，如何修改呢？
只需将SQL语句中的全部列字段删除，换成*星号即可
SQL语句修改如下：
select*from[数据源$]where中文名称='万用表'
SQLselect子句语法：
select列标题1,列标题2,列标题3from[工作表名称$]where列标题运算符值
select中文名称,型号,管理编号from[数据源$]where中文名称='万用表'
◆中文名称,型号,管理编号叫做列字段（即列标题），各字段之间使用英文逗号隔开
◆查询结果返回的信息，分别对应中文名称,型号,管理编号列标题，列标题的增删请随意
◆[数据源$]是数据源工作表的名称，后面必须要跟一个$符号，并用方框号[]括起来
◆中文名称='万用表'，这里的值是文本，需要使用单引号引起来
Tips：
本例的数据源工作表和结果表工作表同在一个工作簿中，如果数据源是单独的一个工作簿，那么SQL语句中则需要增加数据源工作簿的地址了。
[D:\Excel关联\仪器总表.xlsx].[数据源$]
◆第一方括号[]是包含路径的数据源工作簿名称，第二个方括号[]是数据源工作簿中工作表的名称
◆两个方括号之间使用.点号连接，表示从属关系
等更新太累，想要了解更多，分享你的疑难杂症，
职场高效Excel
