Как скопировать активные ячейки в тело письма Outlook? - Мир MS Excel

Регистрация

Напомнить пароль

= Мир MS Excel/Как скопировать активные ячейки в тело письма Outlook? - Мир MS Excel

Страница 1 из 1 1
Модератор форума: _Boroda_, китин, DrMini

Как скопировать активные ячейки в тело письма Outlook? (Макросы/Sub)

Как скопировать активные ячейки в тело письма Outlook?

Дата: Четверг, 29.05.2014, 15:05 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 21

Репутация: 0 ±

Замечаний: 20% ±

Здравствуйте, друзья. Подскажите, как вставить в тело письма определенный Range, желательно сохраняя форматирование ячеек?

Пытаюсь сделать так:

[vba]

Код

Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")

Dim olMail As Outlook.MailItem
Set olMail = olApp.CreateItem(olMailItem)

olMail.To = "misriks@yandex.ru"

dim body as Variant

Range("A1:B2").Activate
body = SelectedCells

olMail.Body = body
olMail.Send

[/vba]
Но приходит пустое письмо =(

Сообщение отредактировал Serge_007 - Четверг, 15.01.2015, 23:26

Ответить

Дата: Понедельник, 02.06.2014, 00:42 | Сообщение № 2

Группа: Проверенные

Ранг: Обитатель

Сообщений: 281

Репутация: 48 ±

Замечаний: 0% ±

Excel 2013

http://msdn.microsoft.com/en-us....1).aspx

WMR: R183220163895

Ответить

Дата: Суббота, 03.06.2017, 09:14 | Сообщение № 3

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 117

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Спасибо, прекрасно работает

Ответить

Как скопировать активные ячейки в тело письма Outlook? (Макросы/Sub)

Страница 1 из 1
1

© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!