dim mydata as string, mytable as string, sql as string
dim cnn as adodb.connection
dim rs as adodb.recordset
dim i as integer
mydata = "provider=microsoft.jet.oledb.4.0" &_
";data source=" & thisworkbook.fullname& _
";extended properties=""excel 8.0;"""
set cnn = new adodb.connection
with cnn
.connectionstring = mydata
.open mydata
end with
dim strin as string
strin = " first(序號) as 序號, first(工廠) as 工廠, first(主產品) as 主產品,first(主產品描述) as 主產品描述, 生產訂單號, 作業型別, first(作業型別描述) as 作業型別描述,sum(數量) as 數量, first(計量單位) as 計量單位 "
sql = "select " & strin & " from[上載格式$a1:i15] group by 生產訂單號, 作業型別"
set rs = new adodb.recordset
rs.open sql, cnn, adopenkeyset, adlockoptimistic
sheets("sheet1").range("a2").copyfromrecordset rs
sheets("上載格式").rows(1).copy
sheets("sheet1").range("a1").select
activesheet.paste
執行insertinto命令
dim sql1 asstring
sql1 = "insert into [處理後$]select '管理' as 部門, * from [" & thisst.name& "$a1:n65536] where 姓名='" &rs.fields("姓名").value & "'"
cnn.execute sql1
Excel中使用Sql過濾資料的方法
excel作為辦公資料必不可少的載體一直被廣泛使用。作為資料載體，我們可以將其看作小型的資料庫。excel除了提供眾多的規範化的便捷功能外，也提供了sql介面，使我們可以像操作table一樣來操作sheet。microsoft query 開啟excel程式 在資料選項卡上的獲取外部資料組中，單擊從...
在Excel中使用SQL語句查詢和篩選
本文 今天在微博上看到 資料分析精選 言歸正傳，整理自原文以例子的方式來分享下這個功能模組的使用。有如下的2張表，表1裡面包含姓名 時間 培訓內容欄位的資料，表2包括姓名 職務 年薪欄位的資料，我們可以看到2張表都有姓名字段。表1 表2 現在想統計表2中名單上的人在表1中的培訓記錄。人肉實現或者vl...
ACCESS中使用SQL語句
以下sql語句在access xp的查詢中測試通過 建表 create table tab1 id counter,name string,age integer,date datetime 技巧 自增字段用 counter 宣告.欄位名為關鍵字的字段用方括號括起來,數字作為欄位名也可行.建立索引 ...