I do not know why this does this. But I was able to work around the problem. Please try this...
Maybe try declaring the FSO as Object. "Dim FSO" without a declaration declares the FSO as a variant. Just a...
Each block is a named range. There are 6 Key colors which are based on the information in column “Y”(Rental...
I cleaned up the code. This will place next month and year in cell A1. So today is Sep30 2018...
This was tested in a blank worksheet (no data). The macro will place next Month and Year in cell A1....
Updated the code to include the possibility of blank cells in the raw data. If a blank cell is found...
Lets try this again. You will need 3 sheets. Sheet1, Sheet 2 and Sheet3 Sheet1 your raw data Sheet2 is...
Hey Thank you so much. Apologies for not been very clear on the question. Using your example, in the output...
I want help to rename all folders in a root folder with different name using VBA. So that one button click it should happen. In Excel I have all existing folder names in one column and new folder names in another column. Appreciate your help here.
Here is the vba code to rename all folders in root folder form existing name to new name. The below code will loop through all folder names and will update new name.
Const sRootFolder As String = "C:\Users\IBM_ADMIN\Desktop\3QWk10\SubBrand Integration\"
Dim Old_FolderName As String, New_FolderName As String
For i = 2 To .Range("AE1").End(xlDown).Row
Old_FolderName = sRootFolder & Sheets("Settings").Range("AE" & i)
New_FolderName = sRootFolder & Sheets("Settings").Range("AF" & i)
Name Old_FolderName As New_FolderName
Hope it resolves your requirement
Please share using the share button above.
If you found the answer is best answer for your question, Please mark as 'best answer' by clicking on the right tick mark icon at the left side of the answer.
Found the answer useful and wants to credit the user, then vote the answer (vote up).