How to copy a file from one folder to another in vba

[pkstormy]

Make sure you have no spaces in the folder/filename.


OldName = "C:\OldFolder\SomeExample.xls"
NewName = "C:\NewFolder\SomeExample.xls"
retval = 0
Dim objFSO As Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
retval = objFSO.CopyFile(OldName, NewName, True)
Set objFSO = Nothing


msgbox "Copy/paste complete"

[tormodnt]

Could you help me with how I can get a pop up box to chose new file location instead of using a pre typed one?
I could use this to make a backuptool of my back end db, and place it on a external drive and so on.

If there is already a solution for something like this, you could point me in the right direction since I can't seem to find any.

Best regards
Tormod
Norway

[pkstormy]

There are a couple examples of this somewhere in the code repository. I can't recall what they are named though but I think you want to look for the ones which have 'browse' for files somewhere in the heading.