[Iska]

Я не в курсе, появилась ли в новых версиях Microsoft Excel возможность нажимать на ячейки, но в прежних, насколько я помню, такой возможности не было.

Вот примерный макрос:

Код:

Option Explicit

Sub CreateMailByMicrosoftOutlook()
    Dim objOutlook As New Outlook.Application
    
    With objOutlook
        With .CreateItem(olMailItem)
            With .Recipients.Add("Василий Пупкин")
                .Type = olTo
                .Resolve
            End With
            
            .Subject = ThisWorkbook.ActiveSheet.Range("A2").Value
            .Body = ThisWorkbook.ActiveSheet.Range("B2").Value
            
            .Display
        End With
    End With
End Sub

Вы можете привязать его выполнение к рисунку, автофигуре, кнопке в UserForm и т.п. Предварительно потребуется добавить в проект ссылку на объектную модель Microsoft Outlook установленной версии Microsoft Office.

[JimmOnLine]

mailto:mail@mail.ru?subject=Тема&body=содержимое письма!%0AНовая строка%0AНовая строка%0AНовая строка.

=СЦЕПИТЬ("mailto:";H1;"?subject=Тема&body=Содержимое письма%0AНовая строка.")
=ГИПЕРССЫЛКА(СЦЕПИТЬ("mailto:";H1;"?subject=Тема&body=Содержимое письма%0AНовая строка."))

Решено.

[Iska]

Решено. »

Откроется почтовый клиент по умолчанию .

[JimmOnLine]

Ну это само собой.