MIS VBA Macro Tricks - 1

Sub Making_folder()
For Each cell In Selection
MkDir "D:\Mar2023\" & cell.Value
Next cell
End Sub