返回列表 上一主題 發帖

[發問] 請問1些搬移的問題

[發問] 請問1些搬移的問題

本帖最後由 mark15jill 於 2011-5-18 09:30 編輯

因資料太多 如果一筆一筆慢慢搬移 會手廢掉= =!!
故做了一個比對表 和一個按鈕 想請問說 能否弄個VBA 將想要的資料 搬移到想要的資料夾名稱...

需求簡易說明
1.壓縮檔內有  需求說明文件  比對表  EXCEL存放區 和 資料夾存放區 兩個資料夾
    而在 EXCEL存放區內 有13份EXCEL檔案   資料夾存放區內 有 13個資料夾

2.想請問說 能否在比對表內 的 搬移 按鈕按下時候
    依照 比對表內的 TEXTbox 內容 將 EXCEL存放區內的檔案 放置該目錄下的 資料夾名稱
    如  TEXTBOX內容為 (D:\90年度\) 按下搬移後  EXCEL檔案 (90年度-001 ) 會搬移到 D:\90年度\90年度-001-王1 的資料夾內


檔案附帶於此   (479K才是正確的ˇˇ  另外一個是誤傳)
[attach]6158[/attach]

能.rar (479.29 KB)

回復 1# mark15jill


    +.+  是我表達不夠清楚嗎

TOP

回復 3# GBKEE


    版大  那些程式的話 是只能限定於 同磁碟嗎??(如 C 對 C )
還是說 可以不同磁碟區???
因為如果是同磁碟區可行的話 那就不用把比對表搬移過去
如果不可行的話 那就得搬移過去了

TOP

回復 5# GBKEE


    就是那個意思....  謝謝板大
因為常常為了要搬移上千個檔案  而導致眼花撩亂= =!! 手極度痠痛

TOP

本帖最後由 mark15jill 於 2011-5-18 10:41 編輯

回復 5# GBKEE


  大大 不好意思 有點小問題ˇˇ!!!
如果碰到非連續的資料
如 (號碼1 3 4 7 8 9 10 11 15 19 20 ) 類似這樣


就會沒有動靜

TOP

本帖最後由 mark15jill 於 2011-5-18 11:55 編輯

回復 8# GBKEE
目前 我的方式 是

123
-比對表
-excel存放區(G攔的資料) <有187筆>
        89年度-002
      89年度-004
      89年度-027
-資料夾存放區(H欄位資料) <有187筆>
      89年度-002-王1
     89年度-004-王4
     89年度-027-王27

但是  跑到這行的時候 會出現 以下圖片訊息
    Name TheFile As F & "\" & A



錯誤訊息.jpg

TOP

回復 10# GBKEE
看了= =!!
看不懂...
是檔名路徑太過長嗎??
還是???



錯誤的檔案名稱或數目 (錯誤 52)
請參閱     特性

此錯誤發生在存取某檔案時。此錯誤有以下的起因和解決方法:

陳述式引用到如下的檔案代碼或檔案名稱:
在 Open 陳述式中沒有提到或雖有提到但已經關閉。
在 Open 陳述式中提到此檔名。注意如果您呼叫 Close 陳述式時沒有用適當的引數,可能會不小心關閉目前所有開啟的檔案和檔案號碼。

超出檔案號碼範圍 (1 - 511)。
如果您的程式碼中會產生檔案號碼的話,請確定產生的檔案號碼是否正確。

不正確的檔名或檔案號碼。
檔案名稱必須遵循作業系統規格。在 Microsoft Windows,可使用以下的規格:

檔案或目錄名稱可以有兩部份:檔名和選擇性副檔名。兩部份以句點隔開,例如,myfile.new。


檔名可達 255 字元。


檔名必須以字母或數字做為開頭。它可以包含大小寫字元 (檔案名稱不分大小寫),但以下的字元除外:雙引號 (")、標點 (')、斜號 (/)、反斜號 (\)、冒號 (:)、垂直號 (|)。


檔名可以包含空白。


以下的名稱將保留且不能用在檔案或目錄上:CON、AUX、COM1、COM2、COM3、COM4、LPT1、LPT2、LPT3、PRN、NUL。例如,如果您要在 Open 陳述式中將檔名設為 PRN 的話,那麼 Print # 和 Write # 陳述式的預設印表機將會指向 Open 陳述式中的檔案號碼。


以下是正確的 Microsoft Windows 檔案名稱;
    LETTER.DOC
    My Memo.Txt
    BUDGET.92
    12345678.901
    Second Try.Rpt

在 Macintosh 上,檔案名稱可以包含任何的字元,除了冒號 (:) 以外,而且也可有空白,不過 Null 字元 (Chr(0)) 在任何檔案名稱上是不允許的。
詳細資訊,可選取有疑問的項目並按下 F1 (在Windows中) 或 HELP (在Macintosh上)。

TOP

本帖最後由 mark15jill 於 2011-5-19 08:23 編輯

回復 12# GBKEE


        不好意思  我資質愚鈍= =!!
檔案已經附上 因為內容牽扯壹些機密 所以 把內容刪除了

目的 目前只希望 是否能夠將該相同的大目錄內的 EXCEL存放區所有檔案 搬移到 資料夾存放區 內的 個別資料夾內

能.rar (488.42 KB)

TOP

回復 14# GBKEE

我所謂的錯誤有2
1.就是上面的那種情形和圖
2.沒辦法搬移到個別資料夾

TOP

回復 16# GBKEE


    ˇˇ 那就是我納悶的地方
因為 如果沒出現那個訊息  也只會把檔案搬到該根目錄 並不會搬移到個別資料夾內..
但是 如果出現那個訊息 是連動都不會動= =!!!!
所以 我才一直請教您 是什麼情形..

TOP

        靜思自在 : 脾氣嘴巴不好,心地再好也不能算是好人。
返回列表 上一主題