如何在Excel中使用SQL语言实现数据查询

1选中表格后单击右键选择“定义名称”

2单击后，出现命名对话框

3这里将表1和表2分别命名为Table1和Table2。

4选择上方的“数据”选项卡，选择“自其他来源”下的“来自Microsoft Query ”选项

5在d出的对话框中选择Excel Files那一项，并且把对话框下面的“使用“查询向导”创建/编辑查询”勾掉，

6点击“确定”，便出现“选择工作簿”的对话框，这里选择包含表1和表2的工作表xxxxlsx

7点击确定后之后d出添加表的对话框

8点击确定后之后d出添加表的对话框

9输入SQL语句的按钮，d出输入SQL语句的对话框 输入SQL，看到筛选出来的数据表

10将筛选出来的数据表再返回至Excel工作表当中，选择菜单中的“文件”——“将数据返回Microsoft Excel”，纯手打，望采纳答案哦，谢谢

在宏编辑界面中进行SQL数据查询以及生成报表的代码如下：

Sub Static()

Dim objNewWorkbook As Workbook '定义一个Workbook对象

Set objNewWorkbook = WorkbooksAdd(ThisWorkbookPath & "\模板xlt") '使用模板文件新建一个EXCEL报表生成文件

Set objConnection = CreateObject("ADODBConnection") '创建一个ADO连接

objConnectionOpen "Provider=MicrosoftJetOledb40;Extended Properties='Excel 80;Hdr=yes;Imex=1';Data Source=" & ThisWorkbookFullName '设置连接字符串

strCommand = "select 施工人, count() as 拆电话 from [" & Sheet1Name & "$] where 施工动作 = '拆' and 专业类型 = '电话' group by 施工人" '查询表单一中的数据源进行统计

objNewWorkbookSheets(1)Range("A3")CopyFromRecordset objConnectionExecute(strCommand)

2将查询统计结果输出到目的报表文件的表单1的从A3开始的区域中

3下面代码是调用EXCEL的排序方式进行汉字排序，这里SQL语句中的排序对于汉字排序与期望结果不同

4使用EXCEL中的排序方法是根据EXCEL版本不同调用有所区别

Select Case ApplicationVersion

Case "110":

objNewWorkbookSheets(1)Range("A3:M" & CStr(intSumRow - 1))Sort Key1:=objNewWorkbookSheets(1)Range("A3"), Order1:=xlAscending, Header:=xlNo, _

OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, SortMethod _

:=xlPinYin, DataOption1:=xlSortNormal

Case "120":

objNewWorkbookSheets(1)SortSortFieldsClear

objNewWorkbookSheets(1)SortSortFieldsAdd Key:=Range("A3:A" & CStr(intSumRow - 1)), SortOn:=x

以上就是关于如何在Excel中使用SQL语言实现数据查询全部的内容，包括:如何在Excel中使用SQL语言实现数据查询、如何用SQL语句查询Excel数据、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！