Copying a file

[da_silvy]

Dim File1, File2 As String
File1 = "c:\notepad.file"
File2 = inputbox("File Name?", "File")
Name File1 As File2