iT邦幫忙

0

Excel VBA 如何將查詢到的資料 依照圖示填入儲存格?

大家好
最近剛入門學習 excel vba
目前能透過下面 sql指令 抓出如 圖片右方的資料

想請問如何將讀取到的陣列 依照左方的格式 填入資料呢?

[sql 指令]
select order_no as '訂單號碼' ,order_date as '交期',product_name as '產品編號',producut_num as '數量' from order_table;https://ithelp.ithome.com.tw/upload/images/20200528/20009841SijGTFHlya.png

achan iT邦新手 3 級 ‧ 2020-05-28 17:47:57 檢舉
黃色部分 是自己想進一步學習的部分
如何將 D2:F2 當成變數 依序 帶入sql指令查詢資料?

2 個回答

0
paicheng0111
iT邦高手 1 級 ‧ 2020-05-28 18:15:10
select 
    order_no as '訂單號碼' 
    ,order_date as '交期'
    ,product_name as '產品編號'
    ,producut_num as '數量' 
from order_table
WHERE product_name IN ('產品A', '產品B', '產品C');
achan iT邦新手 3 級 ‧ 2020-05-29 08:27:42 檢舉

謝謝paicheng0111 的回答
用where 篩選出來產品abc 指令我已經會下

但要將資料依照excel 對應的 產品編號 與 交期順序存入的指定位置 是否可以指點一下? (如圖示 左邊)

Dim SQL As String

SQL = "select order_no as '訂單號碼' ,order_date as '交期',product_name as '產品編號',producut_num as '數量' from order_table WHERE product_name IN ("
SQL = SQL & " '" & Range("D2").Value & "'"
SQL = SQL & ",'" & Range("E2").Value & "'"
SQL = SQL & ",'" & Range("F2").Value & "'"
SQL = SQL & ");"
0
rogeryao
iT邦高手 2 級 ‧ 2020-05-29 21:25:02

這個問題有點複雜 ,要考慮到以下幾點 :
1.產品編號可能有 N 個
2.產品編號去除重複之後要轉成欄位名稱 ,要向右延伸(延伸幾欄無法確定)
3.再由產品編號欄位名稱依照訂單號碼,交期做加總數量
4.單一產品還要加總所有的數量及交易筆數

achan iT邦新手 3 級 ‧ 2020-06-02 09:23:41 檢舉

您好,
目前的EXCEL 表單上的產品編號已經固定欄位
只是下方的 訂單資訊 想透過SQL 抓取資料依序(日期)放入
--->取代原本人工查詢 登打動作

目前我想到的作法是
1.針對欄位上的所有產品抓出[訂單號碼][日期]匯成訂單清單
2.從每一欄產品開始 搭配 第一點的訂單/日期 清單 得出資料,帶入EXCEL表格

不過實作要寫程式的部分 還有很多要學

我要發表回答

立即登入回答