返回列表 上一主題 發帖

增加重復資料筆數

d8722468

帖子
7 
主題
3 
精華
0 
積分
10 
點名
0  
作業系統
WIN7 
軟體版本
64 
閱讀權限
10 
註冊時間
2015-8-2 
最後登錄
2019-8-23 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-9-23 16:32 | 顯示全部帖子

增加重復資料筆數

請教各位大大
在資料中有這三個欄位，
已知數量這個欄為"數值"
如何依"數量"這位欄位為準，產生多筆資料
請問如何用vba程式寫出
原資料 如下表
品號        批號        數量
aaaaa        bbbbb        3----->變成3筆數量為1的data
aaaaa1        bbbbb1        2----->變成2筆數量為1的data

想要的結果

品號        批號        數量
aaaaa        bbbbb        1
aaaaa        bbbbb        1
aaaaa        bbbbb        1
aaaaa1        bbbbb1        1
aaaaa1        bbbbb1        1
收藏 分享

d8722468

帖子
7 
主題
3 
精華
0 
積分
10 
點名
0  
作業系統
WIN7 
軟體版本
64 
閱讀權限
10 
註冊時間
2015-8-2 
最後登錄
2019-8-23 
2#
發表於 2015-9-23 16:37 | 顯示全部帖子

未命名.jpg (182.85 KB)

未命名.jpg

TOP

d8722468

帖子
7 
主題
3 
精華
0 
積分
10 
點名
0  
作業系統
WIN7 
軟體版本
64 
閱讀權限
10 
註冊時間
2015-8-2 
最後登錄
2019-8-23 
3#
發表於 2015-9-23 17:58 | 顯示全部帖子
感謝lpk187 大大~~小弟測試成功
再請教一下
那原資料可否刪除只留下新的DATA

品號        批號        數量
aaaaa        bbbbb        3----->變成3筆數量為1的data
aaaaa1        bbbbb1        2----->變成2筆數量為1的data
跑完程式後只留下這樣的結果
品號        批號        數量
aaaaa        bbbbb        1
aaaaa        bbbbb        1
aaaaa        bbbbb        1
aaaaa1        bbbbb1        1
aaaaa1        bbbbb1        1

TOP

d8722468

帖子
7 
主題
3 
精華
0 
積分
10 
點名
0  
作業系統
WIN7 
軟體版本
64 
閱讀權限
10 
註冊時間
2015-8-2 
最後登錄
2019-8-23 
4#
發表於 2015-9-23 18:45 | 顯示全部帖子
非常感謝lpk187 大大~~
解決了小弟困難!!!
非常感謝!!!

TOP

        靜思自在 : 君子立恆志，小人恆立志。
返回列表 上一主題