返回列表 上一主題 發帖

SQL多表格篩選教學

joey0415
　暱稱: joey0415

中學生Rank: 2

帖子
361 
主題
57 
精華
0 
積分
426 
點名
0  
作業系統
win7 
軟體版本
2003,2010 
閱讀權限
20 
性別
男 
註冊時間
2010-5-13 
最後登錄
2022-12-8 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-11-6 21:28 | 只看該作者

SQL多表格篩選教學

本帖最後由 joey0415 於 2013-11-6 21:37 編輯

看到有很多人問類似的問題，之前也曾發生在自己身上，今天透過影片教學方式可能會明白一些

常常有人問要從許多SHEET中找到想到的資料並篩選，2003只能有三種排序，2010好像能更多

但是如果會SQL語法，以上的問題都不是問題，千變萬化，記得之前在EXCEL HOME中有人寫到，數十萬筆資料中找到你要的EXCEL傳統的方法一但數量大了，時間會拉很長，而SQL法依然只要數秒鐘，加上自已親身體驗過，所以發現很重要，只不過EXCEL中的資料表要加上 [    ]  ，正常的資料庫語法是不用的，如果你的資料每天有數十萬筆的，其實要把資料放進真正的資料庫中才是最好的方式，如果有高手能指點更好的方法，請多指教！謝謝
SQL語法教學網站

影片分兩種2003與2010路徑不同

可以看影片找到方法或是用錄製的修改位置即可！
sheet1 內容

sheet2內容

=========================
影片教學：
https://www.youtube.com/watch?v=J4jX1s-ZsOM&feature=youtu.be
2010重要圖片







=========================
影片教學：
https://www.youtube.com/watch?v=crvrCDQtM60&feature=youtu.be
2003重要圖片









=========================
2003 vba語法

紅色字處表示需要修改的語法
F:\data.xls  改成自己檔案的路徑
select * from [Sheet1$] a left join [Sheet2$] b on a.訂單編號=b.訂單編號      改成你要的SQL語法
  1. Sub Macro1()
  2. '
  3.     With ActiveSheet.QueryTables.Add(Connection:=Array( _
  4.         "OLEDB;Provider=Microsoft.Jet.OLEDB.4.0;Password="""";User ID=Admin;Data Source=F:\data.xls;Mode=Share Deny Write;Extended Properties=""HD" _
  5.         , _
  6.         "R=YES;"";Jet OLEDB:System database="""";Jet OLEDB:Registry Path="""";Jet OLEDB:Database Password="""";Jet OLEDB:Engine Type=35;Jet OLED" _
  7.         , _
  8.         "B:Database Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Passwo" _
  9.         , _
  10.         "rd="""";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet O" _
  11.         , "LEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False"), Destination _
  12.         :=Range("A1"))
  13.         .CommandType = xlCmdTable
  14.         .CommandText = Array("select * from [Sheet1$] a left join [Sheet2$] b on a.訂單編號=b.訂單編號")
  15.         .Name = "data_3"
  16.         .FieldNames = True
  17.         .RowNumbers = False
  18.         .FillAdjacentFormulas = False
  19.         .PreserveFormatting = True
  20.         .RefreshOnFileOpen = False
  21.         .BackgroundQuery = True
  22.         .RefreshStyle = xlInsertDeleteCells
  23.         .SavePassword = False
  24.         .SaveData = True
  25.         .AdjustColumnWidth = True
  26.         .RefreshPeriod = 0
  27.         .PreserveColumnInfo = True
  28.         .SourceDataFile = "F:\data.xls"
  29.         .Refresh BackgroundQuery:=False
  30.     End With
  31. End Sub
複製代碼
=====================
SQL語法範例

select * from [Sheet1$] where 訂單編號='A002'
select * from [Sheet1$] where 送貨備註='需回收禮卷'
select * from [Sheet1$] where 送貨備註='需回收禮卷' and 總金額=0
select * from [Sheet1$] a left join [Sheet2$] b on a.訂單編號=b.訂單編號
select * from [Sheet1$] a left join [Sheet2$] b on a.訂單編號=b.訂單編號 where a.訂單編號='A002'

=============================

文件下載處：
SQL.zip (30.3 KB)
收藏 分享

        靜思自在 : 【時日莫空過】一個人在世間做了多少事，就等於壽命有多長。因此必須與時間競爭，切莫使時日空過。
返回列表 上一主題