Referring to one cell as a filename, and save it.

Hello!

I am trying to make a macro which is doing the following.

1. Defining a standard path:
C:\test\macro

2. open a *.txt file within this path, the name of the file is given in cell "a1".

3. Save it with a new filename, the filename is given in cell "b1".

Anyone knows how to do this? And does it matter if the filetype varies?

Cheers

I dont need to open it, but need to create a second copy, still as a text file.

Thank you!

It is getting close, but still, it doesn't keep the original. What are the magic words?

Please Login or Register  to view this content.

Thanks.

Now I am trying to make a second macro which moves the renamed file into a new path.

This was my effort:

Sub Move()

Dim fPath As String: fPath = "C:\Test\Macro\"
Dim fPath2 As String: fPath = "C:\Test\Macro\Move\"
Dim fNEW As String: fNEW = Range("B2")

FileCopy fPath & "\" & fNEW, fPath2 & "\" & fNEW

End Sub

But it says "File not found" when running the macro. Any idea what is wrong?

Nevermind I saw what I did wrong. Thanks for your help.