Outlook VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Outlook
  4. Creating a New Folder
Sub newFolder()
    Application.GetNamespace("MAPI").GetDefaultFolder(olFolderTasks) _
        .Folders.Add Name:="Personal Tasks", Type:=olFolderTasks
End Sub