Hi, malcolm29.
То просто. Измените эту линию Кодего
Установите OLF = GetObject ("", «Outlook.Application») .GetNamespace («MAPI») .GetDefaultFolder (olFolderInbox)
к
Установите OLF = GetObject ("", «Outlook.Application») .GetNamespace («MAPI») .GetDefaultFolder (olFolderInbox). Скоросшиватели («билеты»)