With the help of VBA Create new folder and Save file

New Folder name :- Jeet
File Name :- ZTAGGING_SCHEME


sub New_folder()
MkDir "D:\Jeet"
Scheem.SaveAs "D:\Jeet"& "\ZTAGGING_SCHEME.xlsx"
Scheem.Close
end sub