Question

我有一个A列文件列表，我需要将每个文件复制到B列的目录中。所以我正在寻找一个循环通过列a的宏并将文件复制到B列中的文件夹

A栏

\ 192.168.2.13 \路径\ file.pdf

\ 192.168.2.13 \路径\ file2.xls

\ 192.168.2.13 \路径\ file3.doc

B栏

\ 192.168.2.13 \路径\文件夹1

\ 192.168.2.13 \路径\文件夹2

\ 192.168.2.13 \路径\ folder3

任何帮助都将不胜感激!!

Answer 1

您应该使用伪VBA代码执行以下操作：

Read the files in column A and save them in array (AA).
Read the files in column B and save them in array (BB).

for each value in AA do the following:
    copy the value from AA with a destination BB

你几乎有两个主要问题 - 如何从列中读取文件以及如何将它们复制并保存到给定位置。祝你好运！

Answer 2

这应该让你开始。

Sub filemove()
Dim From As String
Dim Dest As String

'Assuming A1/B1 have headers
Range("A2").Cells.Select
i = 0
From = ActiveCell.Value
On Error Resume Next

Do While From <> ""
From = ActiveCell.Offset(i).Value
Dest = ActiveCell.Offset(i, 1).Value
FileCopy From, Dest

i = i + 1
Loop

End Sub

在b列中，您需要使用此方法声明文件名。

祝你好运

Excel宏将文件列表（A列）复制到特定文件夹列表（b列）

2 个答案: