Mega Code Archive

 

Categories / VisualBasic Script / Outlook

 

OlFolderTasks

Sub folder()     Dim myCal As MAPIFolder     Set myCal = Application.GetNamespace("MAPI") _         .GetDefaultFolder(FolderType:=olFolderTasks) End Sub