![]() Those 2 code will Create Folders with sub folders and will copy an excel file in the main folder but the Main folder is based only on one column Lr = Cells(Rows.Count, "H").End(xlUp).Row MkDir RootFolder & "\" & r.Text & "\" & Range("L4").ValueĬombined with this code : Sub File_Transfer()ĭim src As String, dst As String, fl As String MkDir RootFolder & "\" & r.Text & "\" & Range("元").Value MkDir RootFolder & "\" & r.Text & "\" & Range("L2").Value I have some code that i found on the web that does some stuff that i need but i don't know how to do it.īelow code that i have : Sub CreateDirs()įor Each r In Range(Selection, Selection.End(xlDown)) The Main folder name need to be based after 3 Excel row "A2" "C2" "B2"īelow a screenshot of inside the Main Folder : I then need to auto copy an excel file to the main folder that have the same name I'd like to make a VBA code that Create a Folder with 9 sub folder inside but the tricky part i guess is that inside those 9 sub folders i need to have again sub folders. I'm new to this and i'm trying to make something work for my company to save some time. Firstly sorry if my english is not perfect as i'm french.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |