Вставка диапазона с листа Excell в текст письма как рисунок

[sasha_prof]

Ребята подскажите плиз как с Excell вставить выделенный диапазон в текст письма в формате рисунка????

[EducatedFool]

Письмо создаётся макросом, или вручную?

Превратить выделенный диапазон в графический файл надо макросом, или вручную?

Если вручную - все просто.
Ужерживая Shift, жмём Правка - Копировать рисунок.

[sasha_prof]

Извините за плохо задан вопрос.
Макрос создаёт письмо и макрос же вставляет рисунок в текст. Также не должно быть возможно его изменять

[EducatedFool]

Формулировка вопроса по-прежнему оставляет желать лучшего...

У вас уже есть макрос, создающий письмо? Если нет, то где файл Excel, на основании которого создаётся письмо?
Какая почтовая программа используется?
Обязательно ли картинку прикреплять в формате JPG, или устроит и вариант с BMP?

[sasha_prof]

Чтото не получается прикрепить файл.


Макрос для отправки:
Dim OutlookApp As Object, SM As Object

Set OutlookApp = CreateObject("Outlook.Application")
Set SM = OutlookApp.CreateItem(olMailItem)

SM.To = email1
SM.Subject = TextDoTemy & "Òåìà ïèñüìà"
SM.Body = "вставка диапазона с екселя как картинку"


On Error Resume Next
SM.Send

'OutlookApp.Quit


Set SM = Nothing
Set OutlookApp = Nothing


Его нужно вставить как картинку в поле Аутлука для текста (сюда SM.Body ), а не как вложеный файл.

[KOSTIK1]

Как прикрепить файл? - тут

[sasha_prof]

Прикрепляю файл.
Там страница Info вот её и нужно вставить как картину в письмо

[sasha_prof]

Ребята помогите плиз, очень нужно

[sasha_prof]

Вы скажите, может данная задача невозможна?

[sasha_prof]

Ребята, если этот вариант не возможен.
Как с данной книги отправить лист в формате PDF?