VBA FileCopy功能|将文件从一个目录复制到另一个目录
Excel VBA FileCopy功能
文件复制是一项内置的vba函数，用于将文件从一个位置复制到另一个提到的位置。要使用此功能，我们需要提及当前文件路径和目标文件路径。
好的，让我们看一下FileCopy函数的语法。
- 来源： 这不过是我们需要从中复制文件的位置而已。我们需要提及完全限定的文件夹路径。
- 目的地： 这是我们需要粘贴复制文件的目标文件夹。
例子
下面是如何使用VBA代码复制文件的示例。
您可以在此处下载此VBA文件复制Excel模板– VBA文件复制Excel模板范例＃1
让我们从一个简单的例子开始。我的文件夹中有一个名为“ Sales April 2019”的文件。以下是同一图片，即“来源”.
从上面的位置，我要复制此文件并将其粘贴到其他文件夹。以下是同一图片，即“目标来源”。
好的，让我们为其编写代码。
打开 文件复制 Sub过程内部的函数。
代码：
子FileCopy_Example1（）
文件复制
结束子
现在，对于第一个参数，我们需要提及当前文件所在的文件路径。
代码：
子FileCopy_Example1（）
FileCopy“ D：\ My Files \ VBA \ April文件
结束子
提到文件夹路径后，我们还需要提及带有文件扩展名的文件。因此，请在文件名前加上反斜杠（\）。
代码：
子FileCopy_Example1（）FileCopy“ D：\ My Files \ VBA \ April Files \ Sales April 2019.xlsx”，结束子
现在在第二个参数中提到我们需要粘贴复制的文件的位置。
代码：
子FileCopy_Example1（）FileCopy“ D：\ My Files \ VBA \ April Files \ Sales April 2019.xlsx”，“ D：\ My Files \ VBA \ Destination Folder \ Sales April 2019.xlsx” End Sub
在下文中，我们需要做的一件事是在结尾处提及文件夹路径，在目标参数中还要提及文件名。
现在，使用F5键或手动运行代码，它将把文件从下面的位置复制到目标位置。
“ D：\ My Files \ VBA \ April Files \ Sales April 2019.xlsx”
“ D：\ My Files \ VBA \ Destination Folder \ Sales April 2019.xlsx”
示例2 –使用变量存储源路径和目标路径。
在前面的示例中，我们直接将源路径和目标路径提供给公式。但这不是继续的最佳做法，因此让我们将它们存储在变量中。
例如，请看下面的代码。
代码：
Sub FileCopy_Example2（）昏暗SourcePath作为字符串昏暗DestinationPath作为字符串SourcePath =“ D：\ My Files \ VBA \ April Files \ Sales April 2019.xlsx” DestinationPath =“ D：\ My Files \ VBA \ Destination Folder \ Sales April 2019。 xlsx“ FileCopy SourcePath，DestinationPath结束子
让我为您详细解释代码。
首先，我声明了两个变量。
昏暗的SourcePath作为字符串昏暗的DestinationPath作为字符串
然后，对于第一个变量，我分配了必须从中复制文件的文件夹路径，文件名以及文件扩展名。
SourcePath =“ D：\ My Files \ VBA \ April Files \ Sales April 2019.xlsx”
对于第二个变量，我已经为目标文件夹路径分配了文件名和excel扩展名。
DestinationPath = “ D：\ My Files \ VBA \ Destination Folder \ Sales April 2019.xlsx”
然后，对于公式FileCopy，我提供了这些变量，而不是冗长的文件夹路径字符串。
FileCopy SourcePath，DestinationPath
这样，我们可以使用变量来存储路径并有效地使用它们。
Example＃3 –文件复制功能出错
有时，文件复制功能会遇到“权限被拒绝”错误。
之所以会出现此错误，是因为在打开复制文件时，如果您尝试复制上述错误，那么请务必关闭文件并执行代码。
