Private Sub btnAttributeAll_Click() Dim SourceFile, DestinationFile SourceFile = "G:\Scans\Scan - 262i\test.jpg" ' Define source file name. DestinationFile = "G:\Scans\test moved\testmoved.jpg" ' Define target file name. FileCopy SourceFile, DestinationFile ' Copy source to target. Kill SourceFile MsgBox "moved file " & SourceFile End Sub
Network and collaborate with thousands of CTOs, CISOs, and IT Pros rooting for you and your success.