Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move and rename a file
Calling all Excel programming brains,
I am trying to move and rename a file but don't know where to start, can anybody help? Thanks, Peter |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move and rename a file
Lookup "Name Statement" in VBA Help Dim OldName, NewName OldName = "OLDFILE": NewName = "NEWFILE" ' Define file names. Name OldName As NewName ' Rename file. OldName = "C:\MYDIR\OLDFILE": NewName = "C:\YOURDIR\NEWFILE" Name OldName As NewName ' Move and rename file. On Jan 27, 1:24 am, "Peter" wrote: Calling all Excel programming brains, I am trying to move and rename a file but don't know where to start, can anybody help? Thanks, Peter |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Move and rename a file
Peter,
Depending on what you actually want to do, try something like Sub AAA() Dim DestinationFolder As String Dim SourceFileName As String Dim DestinationFileName As String DestinationFolder = "C:\Test" '<<< CHANGE SourceFileName = "C:\Test1.txt" '<<< CHANGE DestinationFileName = "C:\Test\Test2.txt" '<<< CHANGE If Dir(DestinationFolder, vbDirectory + vbHidden) = vbNullString Then ' folder does not exist, create it MkDir DestinationFolder End If ''''''''''''''''''''''''''''''' ' If you want to COPY the file, ''''''''''''''''''''''''''''''' FileCopy SourceFileName, DestinationFileName ''''''''''''''''''''''''''''''' ' If you want to MOVE the file. ''''''''''''''''''''''''''''''' Name SourceFileName As DestinationFileName End Sub You'll probably want to add some error checking to ensure the file exists, and the destination file does not exist, but the code above should get you started. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com (email on the web site) "Peter" wrote in message oups.com... Calling all Excel programming brains, I am trying to move and rename a file but don't know where to start, can anybody help? Thanks, Peter |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Cannot Move, Copy, Insert, Rename, or Delete a Worksheet in Any Wo | Excel Discussion (Misc queries) | |||
Move and rename a file | Excel Programming | |||
Open a sheet rename and move to another workbook | Excel Programming | |||
Rename or move file function | Excel Programming | |||
Insert sheet, move to end, rename with cell data. | Excel Discussion (Misc queries) |