Macro VBA to save/copy specific files located at specific folder to another folder that the user can choose with a folder dialog

[prati]

Hey

I have macros that creates several pdf files at specific folder.
The file names are as follows:

Article.pdf
Article.part1.pdf
Article.part2.pdf
Article.part3.pdf

The files are always in pdf format

The location is always C:\Temp

The filenames are always the same

In another words the paths of those four files and the names remain the same as follows:

C:\Temp\Article.pdf
C:\Temp\Article.part1.pdf
C:\Temp\Article.part2.pdf
C:\Temp\Article.part3.pdf

Until now it was a background of several macros that in the end produces those files - Now I will get to my question.

Now I would like to ask for help in order to write a new macro with my very little knowledge.

I'm searching for a Macro VBA that will prompt the user to save those four specific files with folder dialog.

In another words the macro will open a folder dialog and ask the user where does he want to save those four specific files - and copy them to the choosen folder

With my current little Knowledge I only know how to copy a file from a specific location to another specific location

Sub Copy_Four_Files()

FileCopy "C:\Temp\article.pdf", "C:\AnotherLocation\article.pdf"
FileCopy "C:\Temp\article.part1.pdf", "C:\AnotherLocation\article.part1.pdf"
FileCopy "C:\Temp\article.part2.pdf", "C:\AnotherLocation\article.part2.pdf"
FileCopy "C:\Temp\article.part3.pdf", "C:\AnotherLocation\article.part3.pdf"

End Sub

I want to change the Macro so that the user can choose where to save/copy those four specific files, and if possible also to rename the files during the process of the folder dialog / save as.

Thanks in advance,

 

[Zot]

Hey,
Very nice job indeed.
I wonder whether It is possible to make small changes giving the possibility to rename the files during the process. In another words, not only moving them to another folder but also to rename the files.

Renaming file is quite easy. See sample here

VBA Rename File

VBA allows you to rename an existing file, using the Name command. In this tutorial, you will learn how to rename a specific file. If you want to learn

www.automateexcel.com

Renaming Files with Excel VBA

Here's what I need to do. I have these two columns in an excel sheet. With file names. First column has the current filename and the second column has the names I want the files to be renamed to. I...

stackoverflow.com

 

[SimoD]

could i ask on this if the source folder was not a constant, what would need to be done to this code to allow the source folder to be selected each time the macro is run?

 

[Zot]

could i ask on this if the source folder was not a constant, what would need to be done to this code to allow the source folder to be selected each time the macro is run?

I think this is what you need. The solution here from @Fluff our MrExcel MVP

VBA code that prompts user to select file and copy data from workbook

Hi there Please can someone help! I would like some VBA code whereby when a button is pressed it allows the user to select a particular folder. In that workbook, I need the code to automatically copy data from a sheet called "Item Summary" and then to select Columns B:M and copy them into the...

www.mrexcel.com