PTT數位生活區 / Office

[算表]VBA多列合併一列&合併各別欄位內容

看板Office作者時間6年前 (2019/05/24 14:08), 編輯推噓0(0推 0噓 16→)
留言16則, 2人參與, 6年前最新討論串1/1
各位大大 請教如何用VBA 將多列合併為一列， 判斷A欄相同， 將BCD欄合併以「、」串接(內容不重複) 有看別人用Scripting.Dictionary 但不知如何修改 再麻煩大大解析 示意圖 https://i.imgur.com/ZMvBt0B.jpg
檔案 http://t.cn/E9RkRGL -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 101.9.40.140 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1558678097.A.9F7.html
→
05/24 14:49, 6年前 , 1F
以示意圖來看，b欄方面，巢狀迴圈，外迴圈於f2:f4。
05/24 14:49, 1F
→
05/24 14:49, 6年前 , 2F
內迴圈看是1.判斷a2:a8是否於f2:f4相同，2.或是a欄range.
05/24 14:49, 2F
→
05/24 14:49, 6年前 , 3F
find搜尋f2:f4。
05/24 14:49, 3F
→
05/24 14:49, 6年前 , 4F
接著dictionary b2:b8的值是否已存在exists，不存在就新增
05/24 14:49, 4F
→
05/24 14:49, 6年前 , 5F
add。
05/24 14:49, 5F
→
05/24 14:49, 6年前 , 6F
c2:c8方面有寫到c欄為唯一值，所以就以一個變數來連接&字
05/24 14:49, 6F
→
05/24 14:49, 6年前 , 7F
串
05/24 14:49, 7F
→
05/24 14:49, 6年前 , 8F
每當內迴圈執行完畢後，代碼方面將dictionary的項目items
05/24 14:49, 8F
→
05/24 14:49, 6年前 , 9F
以join來合併，合併字元就以內文所寫的"、"，那序號方面則
05/24 14:49, 9F
→
05/24 14:49, 6年前 , 10F
將變數寫入(這方面要要連接時是否就有加上"、"來合併，有
05/24 14:49, 10F
→
05/24 14:49, 6年前 , 11F
的話配合mid)
05/24 14:49, 11F
→
05/24 14:50, 6年前 , 12F
d欄不確定邏輯是什麼，因為編號A01有產品別A01ac和A01a，
05/24 14:50, 12F
→
05/24 14:50, 6年前 , 13F
但只有要寫入A01ac。
05/24 14:50, 13F
→
05/24 14:57, 6年前 , 14F
補充，dictionary要移除所有項目的話，removeall；變數(字
05/24 14:57, 14F
→
05/24 14:58, 6年前 , 15F
串型態)則是再寫入空字串""
05/24 14:58, 15F
→
05/24 18:59, 6年前 , 16F
大大謝謝，有點難，我來好好研究一下@@
05/24 18:59, 16F
‣ 更多 tina1688 的文章
文章代碼(AID): #1SvufHdt (Office)
Office 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 tina1688 的文章
文章代碼(AID): #1SvufHdt (Office)