CopyPaste在VBA中

Question

我对VBA很新。我尝试使用以下代码将工作表复制到另一个工作表：

 Sub CopyPaste

 Dim Source As String
 Dim Destination As String

 Set Source ="\\D:\folder\source.xls"
 Set Destination="\\D:\folder\destination.xls"
 FileCopy Source, Destination
 End Sub

我主要使用以下提供的代码： VBA to copy a file from one directory to another

然而它给出了对象所需的错误。我被困在这一点上。

非常感谢

Answer 1

如果要保存到网络路径，则会使用两个反斜杠，例如

self

代码的正确语法应为：

"\\servername\sharename\filename.xls"

同样如A.S.H所述，请记住不要将Sub CopyPaste Dim Src As String Dim Dst As String Src ="D:\folder\source.xls" Dst="D:\folder\destination.xls" FileCopy Src, Dst End Sub 与字符串变量一起使用。

FileCopy过去曾给我带来麻烦，所以如果您遇到问题，可以尝试下面的代码：

Set

Answer 2

Set仅用于为对象类型变量赋值。

Sub CopyPaste

 Dim Source As String
 Dim Destination As String

 Source ="\\D:\folder\source.xls"
 Destination="\\D:\folder\destination.xls"
 FileCopy Source, Destination
End Sub

在您的路径看起来奇怪之前，这两个反斜杠。