Copy Last Modified file to Specific Folder

[ayyappan80]

Original Code was taken from the below thread, code provided by Mr.Sintek thanks to him

https://www.excelforum.com/excel-pro...fic-sheet.html

I am trying to save last modified file to another path. below are the code based on the above thread.

but i am getting error while saving the file on new folder

Please Login or Register  to view this content.

End Sub

[sintek]

You have omitted some code...This from other thread...

Change Path to ToPath

Please Login or Register  to view this content.

[ayyappan80]

Hi Sintek yes this is from some other thread. but requirement is different. I am trying to find last modified file from path and then want to save this in another path.

Here i am getting error . This (Lfile) i want to save in ToPAth.

With Workbook.Open(LFile)

.Copy Path & FSO.GetBaseName(LFile),Topath

[sintek]

Are you saving a copy to other path or just moving the whole file to another path

[ayyappan80]

Hi Sintek, making a copy to another path

[sintek]

Post 2 solves...

Why are you having input box for path change...Why not Application.FileDialog(msoFileDialogFolderPicker)

[ayyappan80]

Hi Sintek. Thanks for your support. Can you please help me to save the file without opening, want to exclude this With Workbooks.Open(LFile)

i tried with the below code but its failed

.Copy Path & FSO.GetBaseName(LFile),Topath

[sintek]

Please Login or Register  to view this content.

[ayyappan80]

thank you so much Sintek. Its worked

[sintek]

If you feel I have helped, please click on the star to left of post [Add Reputation]
Also....add a comment if you like!!!!
And remember......Mark Thread as Solved.

[ayyappan80]

Why are you having input box for path change...Why not Application.FileDialog(msoFileDialogFolderPicker)
@ mostly its Default folder, so doing through input box instead selecting manually

[ayyappan80]

Thread marked as resolved. Rep Added