|
VangoR
|
|
Gigaine
|
|
|
|
|
|
|
Рег.: 05.11.2004
|
|
Сообщений: 305
|
|
Из: верг
|
|
Рейтинг: 6
|
|
Отправка мэйла с помощью VBA (макроса)
04.08.2009 12:11
|
|
|
Случаем никто не подскажет, как отправить с помощью VBA-макроса простенькое текстовое письмо, без вложений?
Например, в екселе запускается макрос, который долго что-то обсчитывает, а потом берет результат, копирует как текст или таблицу в письмо и отправляет на конкретный мэйл через аутлук или еще как, без лишних диалоговых запросов на подтверждение отправки (какие возникают в мастере слияний ворды при отправке через аутлук).
Так автоматическая отправка расчетных данных, например, на домашний мэйл, когда их планируется закончить далеко после окончания рабочего дня, была бы весьма полезной.
|
Save the Planet... Kill yourself. |
|
|
golovorez
|
|
|
|
|
|
|
|
|
Рег.: 22.12.2002
|
|
Сообщений: 34993
|
|
Из: Речной Вокзал
|
|
Рейтинг: 15699
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: VangoR]
04.08.2009 12:42
|
|
|
У книги есть метод SendMail
|
|
|
golovorez
|
|
|
|
|
|
|
|
|
Рег.: 22.12.2002
|
|
Сообщений: 34993
|
|
Из: Речной Вокзал
|
|
Рейтинг: 15699
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: VangoR]
04.08.2009 12:46
|
|
|
По крайней мере, у меня сработало
code:
Sub Macro1()
Cells(1, 1).Value = "Hi"
ActiveWorkbook.SendMail Recipients:="golovorez@gmail.com"
End Sub
Но вот только аутлук, гнида, ругается, "у вас вирус орудует, пытается письма посылать", так что кнопочку "послать все равно" мне нажать пришлось
|
|
|
VangoR
|
|
Gigaine
|
|
|
|
|
|
|
Рег.: 05.11.2004
|
|
Сообщений: 305
|
|
Из: верг
|
|
Рейтинг: 6
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: golovorez]
04.08.2009 13:18
|
|
|
Спасибо, но вот это вот сообщение как раз и мешает всей полезности.
Может можно как-нибудь иначе обойти? Слышал как-то вроде можно через хоткейсы методом sentkeys (сразу скажу - точно не знаю как это работает, может кто знает?).
|
Save the Planet... Kill yourself. |
|
|
muff
|
|
old hand
|
|
|
|
|
|
|
Рег.: 07.06.2004
|
|
Сообщений: 721
|
|
|
|
Рейтинг: 144
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: VangoR]
04.08.2009 22:31
|
|
|
Не проверял, но может если в Экселе поменять в настройках уровень безопасности на "Низкий", то сообщения не будет.
|
|
|
Cheb
|
|
Carpal Tunnel
|
|
|
|
|
|
|
Рег.: 03.09.2002
|
|
Сообщений: 4681
|
|
|
|
Рейтинг: 4353
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: muff]
05.08.2009 10:44
|
|
|
будет.
ругается-то Outlook 
|
|
|
muff
|
|
old hand
|
|
|
|
|
|
|
Рег.: 07.06.2004
|
|
Сообщений: 721
|
|
|
|
Рейтинг: 144
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: Cheb]
05.08.2009 21:57
|
|
|
Аааа, понял. Ну тогда в Аутлуке нужно найти в настройках соответствующую галочку, которая отключает это сообщение.
|
|
|
Cheb
|
|
Carpal Tunnel
|
|
|
|
|
|
|
Рег.: 03.09.2002
|
|
Сообщений: 4681
|
|
|
|
Рейтинг: 4353
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: muff]
06.08.2009 09:32
|
|
|
я там что-то не нашел такого...
мне бы самому это пригодилось
|
|
|
Swap
|
|
Carpal Tunnel
|
|
|
|
|
|
|
Рег.: 19.09.2004
|
|
Сообщений: 2537
|
|
|
|
Рейтинг: 908
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: Cheb]
06.08.2009 11:09
|
|
|
1) В Outlook нет такой галочки, в свое время искал. Если кто-то покажет, буду рад.
2) Письмо лучше отправлять не через Outlook (MAPI), а подключаясь напрямую к серверу (SMTP). Код сейчас привести не смогу, но, когда сам решал аналогичную задачу, решение для WSH нашел за 5 минут.
|
|
|
muff
|
|
old hand
|
|
|
|
|
|
|
Рег.: 07.06.2004
|
|
Сообщений: 721
|
|
|
|
Рейтинг: 144
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: Swap]
07.08.2009 08:14
|
|
|
Quote:
1) В Outlook нет такой галочки, в свое время искал. Если кто-то покажет, буду рад.
Параметры -> Безопасность -> Защита от вирусов -> галочка Предупреждать если приложения пытаются отправить почту от моего имени
- это не оно?
|
|
|
VangoR
|
|
Gigaine
|
|
|
|
|
|
|
Рег.: 05.11.2004
|
|
Сообщений: 305
|
|
Из: верг
|
|
Рейтинг: 6
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: muff]
07.08.2009 12:21
|
|
|
Это только в Экспрессе она есть.
Офисные приложения с ним так просто не взаимодействуют(.
Т.е. если например отправлять екселевскую книгу как вложение методом ActiveWorkbook.SendMail, то используется офисный аутлук.
|
Save the Planet... Kill yourself. |
|
|
Swap
|
|
Carpal Tunnel
|
|
|
|
|
|
|
Рег.: 19.09.2004
|
|
Сообщений: 2537
|
|
|
|
Рейтинг: 908
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: VangoR]
07.08.2009 12:33
|
|
|
О, спасибо. А я уже думал, свершилось чудо.
UPD. Используется не офисный аутлук, а программа, обрабатывающая MAPI. Можно, конечно, поставить Outlook Express обработчиком, но это уже изврат, хранить часть писем там, часть там.
Редактировал Swap (07.08.2009 12:56)
|
|
|
mgnom
|
|
enthusiast
|
|
|
|
|
|
|
Рег.: 12.03.2004
|
|
Сообщений: 211
|
|
|
|
Рейтинг: 230
|
|
Re: Отправка мэйла с помощью VBA (макроса)
[re: VangoR]
07.08.2009 13:41
|
|
|
копай в сторону Office resourse kit, в нем есть расширенная форма ностроек безопасности...
|
|
Список
Плоский
Дерево
