Excel это не сложно

Основные форумы => Вопросы по Outlook и VBA => Тема начата: Gorev от 03.09.2020, 13:48:20



Название: Макрос на отправку листов и файлов через Outlook
Отправлено: Gorev от 03.09.2020, 13:48:20
Добрый день.

Есть файл в котором много вкладок. Нужна возможность отправки как отдельной вкладки, таки целого файла.

Сделал такой вот код
Код: (vb)
Sub SendWorkbook()
    ActiveWorkbook.SendMail Recipients:=Range("A4"), Subject:="тема"
End Sub
 
Sub SendSheet()
    ActiveSheet.Copy
    With ActiveWorkbook
        .SendMail Recipients:=Range("A4"), Subject:="тема"
        .Close SaveChanges:=False
    End With
End Sub

Вопросы:
1. Как сделать чтобы при отправки отдельной вкладки он создавал файл с именем вкладки, а не просто Книга1
2. Как сделать чтобы вставлялась подпись из Outlook


Название: Re:Макрос на отправку листов и файлов через Outlook
Отправлено: Дмитрий Щербаков(The_Prist) от 03.09.2020, 14:28:39
1. Для этого надо сначала сохранить файл под нужным именем.
2. Данными кодами никак подпись не добавить.

Т.к. тема создана в разделе по Outlook - присмотритесь к возможностям, связанным именно с отправкой через Outlook:
Как отправить письмо из Excel? (https://www.excel-vba.ru/chto-umeet-excel/kak-otpravit-pismo-iz-excel/)
Вставить в письмо подпись из Outlook через VBA (https://www.excel-vba.ru/chto-umeet-excel/vstavit-v-pismo-podpis-iz-outlook-cherez-vba/)