返回列表 上一主題 發帖

[發問] 如何匯入EXCEL資料?

若資料不能規範,只能隨著資料的變化不斷的改程式,那不是很辛苦?
例如妳後來的幾個檔案,QUANTITY與數量的數字不在同一欄,以QUANTITY判斷欄位,正確的數量就取不到了
同時TOTAL,QUANTITY兩個字符都存在不定數的空白鍵,模糊查找就有出錯的機會
又例如妳一樓說"TOTAL"在A欄,但又有些是在B欄的,同時B欄又有包含"TOTAL"字符的儲存格,查找時就先找到錯誤的位置了。
目前我想改變一下取得"TOTAL"的列號,該列最右是金額,倒數第四欄是數量,這樣可能會準確些
每個檔案開啟與關閉都須要時間,若檔案大開啟更慢,所以延遲個幾秒是很正常的。除非妳能規劃出固定的儲存格放置這兩個數字,這樣可以不開啟直接取值。
檔案最好用全名,否則模糊比對也可能出錯。
附件供參考
VBA TEST 5.rar (306.8 KB)

TOP

回復 11# oobird
大師,

若是以檔名作搜尋比較理想,PI_PO Records的檔案中F欄中就有一個File Name專放檔名的欄位,因為A欄所設的BCM號碼我尚有其他用途,可否將取好檔名之後的檔案名稱存放在F欄(不需要改為反白)?A欄則保持原來的名稱,其他如抓取數量及金額也以F欄作為搜尋對象!
請問我該修哪裡?

TOP

這個要釐清一下
a欄與f欄都是妳自己輸入的嗎?就依照妳輸入的順序?

TOP

回復 13# oobird
A欄是我輸入,而F欄是利用你現在新的巨集抓取的.

TOP

那這樣還不是要依照a欄的順序在資料夾中循環比對找出檔案全名放在f欄?

TOP

回復 15# oobird
yes.

TOP

回復 15# oobird
Sorry!如果前面的方式真的不理想的話,F欄就改由我自己輸入,其餘再用程式去填入?

TOP

PI_PO Records.rar (34.25 KB)

TOP

回復 18# oobird

我先試了抓取F欄file name的巨集,發現它只會將所有檔名抓進來而不會比對,不知哪裡出錯了?

TOP

回復 10# Hsieh
版大,
我測試了您的程式,發生以下問題,所以無法執行 ,請您撥冗看下. 謝謝
1)  程式指向這行  d(Sh.Name & "數量") = b.Offset(, -1) 然後出現對話框  
2)  之後出現其中一個excel檔   BCM120105-10 CF blank cap-PO#3310 (出加拿大).zip (23.71 KB)

TOP

        靜思自在 : 有願放在心裡,沒有身體力行,正如耕田不播種,皆是空過因緣。
返回列表 上一主題