各位大俠，我鼓動了2個多小時了，我沒整明白；我需要把D:\Disk\C919檔案下我匯入的資料檔案夾及其包含的所有內容，導到
D:\Disk下，作業緊急需要，還望大俠們不吝賜教
vba的回圈陳述句我都會，我成功編過一個把所需檔案夾復制到所需位置的程式，可是移動我就不會了
注：檔案太大，復制太慢
uj5u.com熱心網友回復：
這個“跨磁區移動”，難道不是“復制到目標位置、然后洗掉源位置”嗎！你所謂的“復制太慢”，不知道你是如何復制的。
Name 陳述句： 重新命名一個檔案、目錄、或檔案夾。
語法
Name oldpathname As newpathname
Name 陳述句的語法具有以下幾個部分：
部分 描述
oldpathname 必要引數。
字串運算式，指定已存在的檔案名和位置，可以包含目錄或檔案夾、以及驅動器。
newpathname 必要引數。
字串運算式，指定新的檔案名和位置，可以包含目錄或檔案夾、以及驅動器。
而由 newpathname 所指定的檔案名不能存在。
說明
Name 陳述句重新命名檔案并將其移動到一個不同的目錄或檔案夾中。如有必要，Name 可跨
驅動器移動檔案。 但當 newpathname 和 oldpathname 都在相同的驅動器中時，只能重新命名
已經存在的目錄或檔案夾。 Name 不能創建新檔案、目錄或檔案夾。
在一個已打開的檔案上使用 Name，將會產生錯誤。必須在改變名稱之前，先關閉打開的文
件。Name 引數不能包括多字符 (*) 和單字符 (?) 的統配符。
uj5u.com熱心網友回復：
Sub testlsy()Name "d:\123" As "e:\456"
End Sub
為什么不行啊，提示 運行時錯誤“75”，路徑/訪問檔案錯誤
uj5u.com熱心網友回復：
我復制時用的是copyfolder，為了保證速度，我會在同一個盤符（比如D:\）下操作，檔案大的時候就比較慢，我一上舉例是不同的盤符，但實際作業中，我操作的都是在同一盤符下uj5u.com熱心網友回復：
Name 陳述句只能針對檔案進行操作，你給它個檔案夾，當然操作失敗！
uj5u.com熱心網友回復：
Sub MoveAFolder()Dim fso
Set fso = CreateObject("Scripting.FileSystemObject")
fso.MoveFolder "D:\123", "E:\123"
End Sub
運行時錯誤，拒絕的權限，為什么啊，我快崩潰了，怎么都不行，難道真的是人品不過關？？？
uj5u.com熱心網友回復：
“拒絕的權限”，那是因為下列的１個或多個原因：1. 你的賬號對那個檔案夾、檔案只有讀取權限，至少沒有“洗掉檔案或檔案夾”的權限！
2. 被移動的檔案，或檔案夾，被“打開”或使用中，暫時不能進行洗掉操作。
3. “移動目標”位置，你的賬號沒有“寫入”權限。
暫時想到的有這些，你自己看看，有沒有其中的1個或多個。
uj5u.com熱心網友回復：
Shell "cmd /c move D:\Disk\C919\*.* D:\Disk",VB_HIDE
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/72166.html
標籤：VBA
上一篇：兩臺計算機檔案同步