Mass File Rename using Excel VBA
Ever needed to rename hundreds of Excel workbooks in a folder?
Use this VBA code to do it.
|
|
Mass File Rename using Excel VBA Ever needed to rename hundreds of Excel workbooks in a folder? Use this VBA code to do it. |
|
Sub sbFileRename() sPath = "C:\Stuff\" sFilename = Dir(sPath & "*v2.0*.txt") Do While sFilename <> "" sNewFilename = Replace(sFilename, "v2.0", "v3.0") Name sPath & sFilename As sPath & sNewFilename sFilename = Dir() Loop End Sub . |