Hi TMShucks,
Thanks for replying. Do mean as follows:
I tried that and I'm getting the same error but at the 'filename' line![]()
Dim fso Dim Filename Dim Sourcename Set fso = CreateObject("scripting.filesystemobject") Filename = Me.Sheets("sheet1").Cells("A1") Sourcename = Me.Sheets("sheet1").Cells("A2") fso.copyfile Filename , Sourcename
Regards, witham
Bookmarks