Ви можете використовувати цю технологію для управління Microsoft Outlook і відправляти електронні повідомлення прямо з вашого листа таблиці або копіювати записи вашої записної книжки. Звичайно ж, особливості Excel такі, що але електронній пошті буде відправлено таблиця, але цей метод дозволяє вам відправляти тільки частина таблиці.
Для того щоб цей код працював, вам необхідно мати встановлений і налаштований Microsoft Outlook на вашому комп'ютері (не плутати з Outlook Express), хоча сам додаток Outlook можна і не запускати.
Мал. 1. Вибір файлу об'єкта бібліотеки для Microsoft Outlook
Потім введіть наступний код в модулі:
Sub Test_Outlook () Dim oFolder As Outlook.MAPIFolder Dim oItem As Outlook.MailItem Dim oOutlook As New Outlook.Application Dim MoOutlook As Outlook.Namespace Set MoOutlook = oOutlook.GetNamespace ( "MAPI") Set oFolder = MoOutlook.GetDefaultFolder (olFolderOutbox) Set oItem = oFolder.Items.Add (olMailItem) With oItem .Recipients.Add ( "[email protected]") .Subject = "Вкажіть тему листа" .Body = "Текст Вашого повідомлення" .Importance = olImportanceHigh .Send End With Set oItem = Nothing Set oFolder = Nothing End Sub
MAPI - це тільки лише тип підтримуваного Outlook простору імен.
Мінлива oFolder вказує на папку за замовчуванням Outlook. Вона є об'єктом, що Outbox, куди ви будете поміщати повідомлення для їх відправки. Ви робите це, привласнюючи змінної oItem посилання на новий елемент пошти в цій папці. Це те ж саме, якщо ви створите нове повідомлення в Microsoft Outlook. Потім код повторює все те, що ви повинні зробити для формування нового електронного листа в Microsoft Outlook.
Властивість Importance дозволяє визначити важливість повідомлення. Можливі значення для цього властивості будуть показані в списку, що випадає при написанні коду. Можна вказати одне з наступних значень: olImmportanceHigh (найбільша важливість), olImportanceNormal (звичайна важливість) або olImportanceLow (мала важливість).
Оператор Send - це команда відправки пошти. Потім змінним oltem і oFolder присвоюються значення Nothing, тому після відправки пошти оперативна пам'ять вашого комп'ютера звільняється.
В останніх версіях Outlook компанія Microsoft внесла ряд змін в систему безпеки, таким чином покращивши роботу цього додатка. Користувач буде отримувати повідомлення про те, що його лист надіслано. У будь-яких інструкціях, якими ви забезпечуєте користувачів, ви повинні вказати особливості використання вашого додатка, а вони, в свою чергу, повинні з ними погодитися.