Коллеги, добрый день. Может кто-либо уделить 5 минут и помочь решить следующий вопрос. В Интернете никак не могу найти. Как делать текст жирным в Excel - ясно, но мне нужно выделить одно слово жирным при переносе его из Excek в тело письма Outlook. Как это можно сделать?

Вот код:

Set Outlookapp = CreateObject("Outlook.Application")
Set SM = Outlookapp.createitem(olmailitem)
SM.To = strAdress
SM.cc = "xxx@xxxx.ru"
SM.Subject = "to update file " & strFileName & " ( " & strOptyName & " )"
On Error Resume Next
SM.body = "Dear " & strNICKNAME & Chr(13) & _
Chr(13) & Chr(13) & "Please update this,the file name is - " & strFileName _
& " ( " & strOptyName & " ) " & " ((( PLEASE REPLY WHEN DONE )))" & Chr(13) & Chr(13) & Chr(13) & Chr(13) & Chr(13) & "<THIS LETTER WAS SENT AUTOMATICALLY>"

'SM.Signature.Text = "this was sent automatically"
SM.display
SM.send

Set SM = Nothing
Set Outlookapp = Nothing



Все переменные идут из Excel, хотелось бы, чтобы текстовое значение strFileName каждый раз (там будет цикл) вставляло в тело письма саму себя, только выделенную жирным шрифтом... Кто может помочь?

С безмерным уважением ко всем пишущим и правящим коды,
Ярослав.