Макрос создаёт и удаляет временную папку.
Макрос
Sub макрос()
Dim FN_folder As String
' Запись в переменную полного имени (путь + имя) временной папки.
' Макрос будет создавать временную папку на рабочем столе.
' В имя папки подставляется префикс "Macro_" и текущая дата и время, чтобы имя папки было уникальным,
' чтобы потом удалить эту папку по этому уникальному имени.
' Format используется, чтобы убрать из времени двоеточия, т.к. двоеточия
' недопустимые символы в имени папки.
FN_folder = Environ("USERPROFILE") & "\Desktop\Macro_" & Format(Now, "dd.mm.yyyy hh.mm.ss")
' Создание папки.
MkDir FN_folder
' Здесь делаете нужные действия с папкой.
' Удаление папки.
FileSystem.RmDir FN_folder
End Sub