- 帖子
- 4
- 主題
- 0
- 精華
- 0
- 積分
- 54
- 點名
- 0
- 作業系統
- WIN7
- 軟體版本
- 2010
- 閱讀權限
- 20
- 性別
- 男
- 來自
- 彰化
- 註冊時間
- 2014-3-22
- 最後登錄
- 2020-1-14
|
供你參考，insert into 整表格作法，讓你有方向去思考。
https://reurl.cc/xDeqmZ
其他語法供你參考
1. 只新增不存在的
strCommandText = "INSERT INTO TABLE select a.* from [Excel 12.0;Database=" & ActiveWorkbook.FullName & "].[" & myTable & "$" & Sheets("TABLE ").Range("A1").CurrentRegion.Address(0, 0) & "] a " & _ "left join " & Up2Table & " b on a.憑單=b.憑單 where b.憑單 is null"
2. UPDATE
strCommandText = "UPDATE " & Up2Table & " a " & _",[Excel 12.0;Imex=0;Database=" & ThisWorkbook.FullName & ";].[" & myTable & "$" & Sheets("svrOrdMaster").Range("A1").CurrentRegion.Address(0, 0) & "] b " & _"SET a.憑單=b.憑單 " & _"WHERE a.憑單=b.憑單" |
|
發表於 2019-11-25 21:56
| 