У меня нет кода.Я даже не уверен, с чего начать.Я перепробовал несколько вещей и потерпел неудачу ...
Outlook.GetNamespace("MAPI").Folders.GetFirst.Folders("Inbox").Folders("Name of Folder").Delete
В одну строку.