Вот работающий код:
Процедура СоздатьПисьмоВOutlook(Адрес, ТемаПисьма, ТекстПисьма)
Попытка
Outlook = Новый COMОбъект("Outlook.Application");
ЕстьОшибка = 0;
Исключение
Предупреждение("Не удалось создать объект Outlook.Application");
ЕстьОшибка = 1;
КонецПопытки;
Если ЕстьОшибка = 0 Тогда
Письмо = Outlook.CreateItem(0);
Письмо.Recipients.Add(Адрес);
Письмо.Subject = ТемаПисьма;
Письмо.Display();
ТекстПисьмаHTML = СтрЗаменить(Письмо.HTMLBody, "<div class=WordSection1><p class=MsoNormal><o:p>", "<div class=WordSection1><p class=MsoNormal><o:p>" + ТекстПисьма);
Письмо.HTMLBody = ТекстПисьмаHTML;
Иначе
Тема = "Тема письма";
ТекстПисьма = "Текст письма";
СтрокаЗапуска = "
mailto:" + Адрес + "?subject=" + Тема + "&body=" + ТекстПисьма;
ЗапуститьПриложение(СтрокаЗапуска);
КонецЕсли;
КонецПроцедуры