expression.AppFolders
expression Required. An expression that returns a SyncObjects object.
Example
The following example sets the SyncObject for the application folders and synchronizes the user's Inbox.
Public Sub SetAppfolders()
Dim olApp As New Outlook.Application
Dim nsp As Outlook.NameSpace
Dim objSycs As Outlook.SyncObjects
Dim objSyc As Outlook.SyncObject
Dim mpfInbox As Outlook.MAPIFolder
Set nsp = olApp.GetNamespace("MAPI")
Set objSycs = nsp.SyncObjects
Set objSyc = objSycs.AppFolders
Set mpfInbox = nsp.GetDefaultFolder(olFolderInbox)
mpfInbox.InAppFolderSyncObject = True
objSyc.Start
End Sub