Move File to Different Directory

[Matt]

Can anyone help me with the code to move a file from one directory to another i.e.

Moving C:testtest.xls to C:test.xls

Thanks in advance

Matt

 

[Legacy 98055]

Hi
Assuming the destination directory already exists.

Name "C:testtest.xls" As "C:test.xls"

Tom

 

[Matt]

Thanks Tom, on the same subject, how would I move all files from one directory to another, have tried

Name "Ccurrent*.*" As "C:saved*.*"

with no success

Matt

 

[Legacy 98055]

Hi Matt
Which version of office are you using?
Tom

 

[Matt]

Office 97

 

[Legacy 98055]

Hi Matt
I do not know how to work with files in Office 97.
Do a file search on your computer for a file called scrrun.dll. Should be in system folder. Microsoft Scripting Runtime
If you have it, I can help you.
If not then someone else will...
Tom

 

[Matt]

Hi Tom

Yes I have that file

 

[Legacy 98055]

Try this

Sub MoveFiles()
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
'creates the destination directory if it does not exist
fso.MoveFolder "C:Current", "C:Saved"
End Sub
Tom

 

[Matt]

Thanks Tom