PJChen

　暱稱: PJ

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2017-8-13 00:16 | 顯示全部帖子

[發問] BOM表VBA

大大們好,

以下圖片是對應欄位的來源，這個程式需求因為說明很長,所以我把程式需求說明放在檔案中。

這些動作我已做超過15次了，因為筆數超過5萬筆,目的檔又有很多公式在內,很花時間在等待及複製貼上,所以才會有一個中繼檔的出現,這可以減少程式run的時間.
檔案中已將大量資料刪除,且公式幾乎都已數值化或刪除,所以測試的時候會快很多.

BOM表VBA.rar (516.42 KB)

樓主熱帖

PJChen

　暱稱: PJ

大學生 Rank: 4

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

2^#

發表於 2017-8-13 19:57 | 顯示全部帖子

本帖最後由 PJChen 於 2017-8-13 20:02 編輯

回復 2# 准提部林

大大,
不好意思,說明太簡略其實寫程式的人也無從著手,這個程式說明看似很長很多，其實作法並不繁複，只是一直在重複做著幾個動作(複製.貼上.篩選出重複資料)，就因為是重複性動作，又很花時間，才想要用VBA...好像讓你有點痛苦了, sorry.

1. 程式一開始有出現一個警告

，不知道對巨集有無影響？

2. 一按巨集鈕必須要出現一個詢問框，例如這樣的對話框

,這樣才能往下執行動作,我也才能知道程式要執行哪個選項！

3. 所有複製的資料一定要先貼在中繼檔，但似乎沒有朝這個方向做，而直接貼在目的檔去了，因為它未出現詢問，所以也不知道它執行的是什麼！

4. 程式未執行完又出現一個異常

,所以實在也不知結果到底如何？

檔案中的說明, item 1~8 只是在

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

3^#

發表於 2017-8-13 20:02 | 顯示全部帖子

本帖最後由 PJChen 於 2017-8-13 20:03 編輯

回復 2# 准提部林

檔案中的說明, item 1~8 只是在

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

4^#

發表於 2017-8-13 23:42 | 顯示全部帖子

回復 5# 准提部林

大大,
不得不說,這真是太神奇，完全沒有看到檔案打開,它就做完了！
我先從中繼檔測試，測試完全正確後,最後才能以正式文件實做(這要到最後階段).
我測試了A. 全選 & B. 局部篩選把結果(明細.sheet) PO上給你看..(因為2種結果都有,所以檔案有點大,需要分割)

全明細.part01.rar (550 KB)

全明細.part02.rar (550 KB)

全明細.part03.rar (550 KB)

全明細.part04.rar (213.24 KB)

A. 全選
1. 明細A欄的公式有很多出現#REF!
2. 明細.sheet 少了篩選鍵
3. 資料有漏抓的情形,以下3筆都是在每張sheet的第一筆
MM17010009,200-999-000-0005,加工件領料
MRPO16030020,259-000-000-0023 採購
MSO17040007,141-122-001-0002 訂單

B. 局部篩選
1. 明細A欄的公式有很多出現#REF!
2. 明細.sheet 一樣沒有篩選鍵
3. 局部篩選為補充資料,所以沒有clear的需求,但它會把資料清空再貼新的資料

TOP

PJChen

　暱稱: PJ

大學生 Rank: 4

帖子: 913
主題: 150
精華: 0
積分: 1089
點名: 0
作業系統: win10
軟體版本: office 2019
閱讀權限: 50
性別: 女
註冊時間: 2011-8-28
最後登錄: 2023-7-19

論壇榮譽勳章論壇贊助勳章

5^#

發表於 2017-8-18 22:35 | 顯示全部帖子

回復 7# 准提部林
今天總算把程式改完並測試完畢,雖然只有一半的程式,還是感謝大大費心寫了這個程式.

TOP