Щелкните событие отправки и получения ленты в надстройке Outlook любого метода или события, чтобы вызвать любой код этого события
Используйте коллекцию Application.Session.SyncObjects для извлечения самого первого элемента (это «Все учетные записи») и используйте SyncObject.SyncStart / SyncEnd события.
Application.Session.SyncObjects
SyncObject.SyncStart / SyncEnd
См. https://docs.microsoft.com/en-us/office/vba/api/outlook.syncobject