Копирование темы в Outlook в сообщение...

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
Аватара пользователя
Busine2009
Сообщения: 322
Зарегистрирован: 18 июл 2009, 15:34
Контактная информация:

Как сделать так, чтобы тема письма копировалась в тело сообщения.
Пример, пишу в теме: Привет, подружка. И фраза "Привет, подружка" появлялась в сообщении (теле письма).
Аватара пользователя
Busine2009
Сообщения: 322
Зарегистрирован: 18 июл 2009, 15:34
Контактная информация:

Вот такое нашёл решение:

Код: Выделить всё

Sub m_1()
Dim myItem As Object
Set myItem = Application.ActiveInspector.CurrentItem
myItem.Subject = "Тема"
myItem.Body = myItem.Subject & vbCrLf & vbCrLf & myItem.Body
End Sub
Аватара пользователя
Busine2009
Сообщения: 322
Зарегистрирован: 18 июл 2009, 15:34
Контактная информация:

Это не работает. Смысл в чём?
Я делаю сообщение, а затем в последнюю очередь пишу тему. Но как оказывается, пока курсор находится в Поле "Тема", то информация не поступает куда-то там и темы не существует.
Как сделать так, чтобы слова из Темы стали видны чему-то там?
Ответить