軟體: Excel 版本: 2016 又來尋求一下幫助 目前我的database 如下 ID X Y A 1 2 B 4 4 C 8 5 D 1 6 D 10 0 E 9 9 E 8 8 我想用SQL Select 將 ID count > 1 者 擷取出來 會變成 ID X Y D 1 6 D 10 0 E 9 9 E 8 8 SQL Coding 如下: strCommandText = "SELECT A.ID FROM[sheet1$] as A group by A.ID having count(A.ID) > 1;" 但這段我只能做到 擷取"ID". X, Y 資訊該怎麼一併得到? 有辦法從現有Code 作擴增? ※ 引述《stma (BBS)》之銘言： : 軟體: Excel : 版本: 2016 : 初次嘗試ADO SQL,失敗收場.... : 目的是想從 Local Excel 抓取資料庫的 sheet1 : 出現錯誤為物件定義錯誤 (請看貼圖說明) : 請問這該怎麼解呢? : '************貼圖說明************** : https: //ppt.cc/fF8LJx : *********************************** : '**********Code 如下*************** : Sub MySQL_1st() : Const adOpenStatic = 3 : Const adLockOptimistic = 3 : Const adCmdText = &H1 : Set objConnection = CreateObject("ADODB.Connection") : Set objRecordset = CreateObject("ADODB.Recordset") : objConnection.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ : "Data Source=C:\Users\Acer\Desktop\excel\SQL\raw\raw_data.xls;" & _ : "Extended Properties=""Excel 8.0;HDR=Yes;"";" : objRecordset.Open "Select * FROM [sheet1$]", _ : objConnection, adOpenStatic, adLockOptimistic, adCmdText : Do Until objRecordset.EOF : Wscript.Echo objRecordset.Fields.Item("ID") : objRecordset.MoveNext : Loop : End Sub --

※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 1.168.88.191 ※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1528537014.A.110.html