如何根據 Excel 中的列表將文件夾從一個文件夾復制或移動到另一個文件夾？

Question

我在 Excel 中有一個包含 346 個文件夾的列表，它指的是工作目錄中 10.000 個文件夾中的 346 個文件夾。

我只想將指定的 346 個文件夾（共 10.000 個）復制/移動到新文件夾。

請注意，查詢指的是文件夾而不是文件。

感謝您的時間。

Answer 1

您可以提前 go 並從 VBA 調用操作系統函數，然后使用標准copy function：

Sub test()
  Dim command As String
  command = "copy c:\test.txt c:\test1.txt"
  Call Shell("cmd.exe /S /K " & command, vbNormalFocus)
End Sub

然后你可以提前 go 並為每個條目制作命令字符串。

請注意，此處需要包含cmd.exe ， Shell(...)需要一個可執行文件。