Board logo

標題: [發問] 整理資料夾內大量資料 [打印本頁]
作者: 520iopiop    時間: 2015-3-17 14:13     標題: [發問] 整理資料夾內大量資料

各位大大好,小弟最近需要整理一批資料(往後也需要整理)所以有些想法想用VBA看能否實現,但有些卡關.....

主要目的：將原有的資料夾內的資料 與 MS-SQL 資料庫內做比對,再複製貼上(或剪下貼上)新建立好的資料夾內.

例:有一個資料夾叫SCAN 內有三個資料夾 分別為 A B C , A資料夾內有一個檔案A12345678.TXT   B資料夾內有兩個檔案B12345678.TXT與B87654321.TXT  C資料夾內有一個檔案  C12345678.TXT
步驟一：我使用參考GBKEE語法 將 檔案路徑 檔名擷取至EXCEL內  (OK)
步驟二：我將MS-SQL製作VIEW表與EXCEL連線取得我即將要移動的名稱 如:B12345678 和 C12345678 (OK)
步驟三：需要將步驟一與步驟二的資料用LIKE做比對(因為實際上要執行的資料可能不是完全比對例如A12345678-1.TXT 但我資料庫可能是A12345678 我希望也擷取出來)(卡關)
步驟四：擷取出來後原本步驟一擷取出來路徑為D:\SCAN\B\B12345678.TXT  和D:\SCAN\C\C12345678.TXT  複製或剪下到  D:\SCAN\封存資料\B\B12345678.TXT 和 D:\SCAN\封存資料\C\C12345678.TXT(卡關)

這樣的做法可行嗎??  能否請教我步驟三和四要怎麼破關??  或是有更好的方式協助能整理檔案(檔案約有上萬筆)..... 發問完畢!!
作者: 520iopiop    時間: 2015-3-17 15:59

回復 1# 520iopiop
自己回覆一下進度...目前比對已完成
剩下步驟四要怎麼搬移??
目前是打算分為  現有  和  退件   兩個資料夾區分
例如1：L:\SCAN\APP\R\R12345678\R12345678.TIF   為退件  將檔按複製貼上(剪下貼上)變成 L:\SCAN\退件\APP\R\R12345678\R12345678.TIF
例如2：L:\SCAN\APP\A\A12345678\A12345678.TXT   為現有  將檔按複製貼上(剪下貼上)變成L:\SCAN\現有\APP\A\A12345678\A12345678.TXT
作者: stillfish00    時間: 2015-3-17 19:07

本帖最後由 stillfish00 於 2015-3-17 19:12 編輯

回復 2# 520iopiop
  1. FileCopy source, destination
  2. 複製一個檔案。

  4. 單元 描述
  5. source 必要引數，此為字串運算式，用來表示要被複製的檔案名稱，source 可以包含目錄或檔案夾、以及磁碟機。
  6. destination 必要引數，此為字串運算式，用來指定要複製的目地檔案名稱，destination 可以包含目錄或檔案夾、以及磁碟機。

  8. 請注意
  9. 如果你想要使用 FileCopy 陳述式於一個已開啟的檔案，則會發生錯誤。
複製代碼
搬移可用Name



歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)