Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

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

 

= Мир MS Excel/Вставка текста в тело письма outlook - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, китин  
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Outlook » Вставка текста в тело письма outlook (Макросы/Sub)
Вставка текста в тело письма outlook
viktorflam Дата: Вторник, 26.01.2016, 17:12 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 0% ±

Добрый вечер товарищи профессионалы и эксперты по VBA скриптам!

В организации всю электронную почту получает и сортирует секретарь руководителя, важные письма она пересылает руководителю для принятия по ним решения. Руководитель нажимает кнопку переслать, руками пишет фамилии исполнителей (иванов, петров, сидоров) и отправляет назад секретарю. Секретарь пересылает исполнителям и устанавливает сроки исполнения документа, она же отслеживает исполнение его.

Какое-то время руководитель писал руками фамилии, потом устал и поставил задачу сделать ему кнопки с фамилиями, нажимая на которые эти фамилии будут добавляться в тело пересылаемого письма, но как это сделать не объяснил)))

А я теперь сижу и ломаю голову...

Вот такая простенькая задача, только у меня нет ни опыта не навыков в этом деле, а самое интересное я не нашел ни одного подобного примера...
[moder]Зачем дублируете темы? Первую закрываю, раз уж здесь есть ответ[/moder]


Сообщение отредактировал Pelena - Вторник, 26.01.2016, 17:49
 
Ответить
СообщениеДобрый вечер товарищи профессионалы и эксперты по VBA скриптам!

В организации всю электронную почту получает и сортирует секретарь руководителя, важные письма она пересылает руководителю для принятия по ним решения. Руководитель нажимает кнопку переслать, руками пишет фамилии исполнителей (иванов, петров, сидоров) и отправляет назад секретарю. Секретарь пересылает исполнителям и устанавливает сроки исполнения документа, она же отслеживает исполнение его.

Какое-то время руководитель писал руками фамилии, потом устал и поставил задачу сделать ему кнопки с фамилиями, нажимая на которые эти фамилии будут добавляться в тело пересылаемого письма, но как это сделать не объяснил)))

А я теперь сижу и ломаю голову...

Вот такая простенькая задача, только у меня нет ни опыта не навыков в этом деле, а самое интересное я не нашел ни одного подобного примера...
[moder]Зачем дублируете темы? Первую закрываю, раз уж здесь есть ответ[/moder]

Автор - viktorflam
Дата добавления - 26.01.2016 в 17:12
Nic70y Дата: Вторник, 26.01.2016, 17:23 | Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 8712
Репутация: 2262 ±
Замечаний: 0% ±

Excel 2010
[vba]
Код
Sub рассылка_2()
    Application.ScreenUpdating = 0
Dim objOL As Object
Dim objMail As Object
Set objOL = CreateObject("Outlook.Application")
Set objMail = objOL.CreateItem(0)
With objMail
'==============================================================================
'адрес получателя
.To = Cells(7, 11)
'==============================================================================
'текст письма
.Body = Cells(7, 14)
'==============================================================================
'тема письма
.Subject = Cells(2, 2)
'==============================================================================
'файл вложение (если есть - прикладываем)
    If [b4] <> "" Then
.Attachments.Add Cells(33, 11).Value
    End If
'==============================================================================
.Send
End With
Set objMail = Nothing
Set objOL = Nothing
End Sub
https://help.yandex.ru/mail....ok-imap
[/vba]
Cells(7, 11) = 7строка 11 столбец = K7


ЮMoney 41001841029809
 
Ответить
Сообщение[vba]
Код
Sub рассылка_2()
    Application.ScreenUpdating = 0
Dim objOL As Object
Dim objMail As Object
Set objOL = CreateObject("Outlook.Application")
Set objMail = objOL.CreateItem(0)
With objMail
'==============================================================================
'адрес получателя
.To = Cells(7, 11)
'==============================================================================
'текст письма
.Body = Cells(7, 14)
'==============================================================================
'тема письма
.Subject = Cells(2, 2)
'==============================================================================
'файл вложение (если есть - прикладываем)
    If [b4] <> "" Then
.Attachments.Add Cells(33, 11).Value
    End If
'==============================================================================
.Send
End With
Set objMail = Nothing
Set objOL = Nothing
End Sub
https://help.yandex.ru/mail....ok-imap
[/vba]
Cells(7, 11) = 7строка 11 столбец = K7

Автор - Nic70y
Дата добавления - 26.01.2016 в 17:23
viktorflam Дата: Вторник, 26.01.2016, 19:41 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 0% ±

Cells(7, 11) = 7строка 11 столбец = K7

Если я правильно понял, это берется из таблицы excel, а как её сюда прикрутить?
 
Ответить
Сообщение
Cells(7, 11) = 7строка 11 столбец = K7

Если я правильно понял, это берется из таблицы excel, а как её сюда прикрутить?

Автор - viktorflam
Дата добавления - 26.01.2016 в 19:41
Nic70y Дата: Вторник, 26.01.2016, 20:09 | Сообщение № 4
Группа: Друзья
Ранг: Экселист
Сообщений: 8712
Репутация: 2262 ±
Замечаний: 0% ±

Excel 2010
сюда
куда это сюда?
да, это макрос для эксель, который отправляет письма через Outlook.
тема перенесена вроде...


ЮMoney 41001841029809
 
Ответить
Сообщение
сюда
куда это сюда?
да, это макрос для эксель, который отправляет письма через Outlook.
тема перенесена вроде...

Автор - Nic70y
Дата добавления - 26.01.2016 в 20:09
viktorflam Дата: Вторник, 26.01.2016, 20:37 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 0% ±

тему переместили в outlook, только она тут вялая какая-то...

макрос для эксель

а если идти от обратного? может скрипт читать текст из ячейки и помещать его в тело письма?

а вообще я так сам себе думаю, если скрипт работает в excel'e то должен работать и в outlook'e, ведь среда у них одна и та же... или я что-то путаю?


Сообщение отредактировал viktorflam - Вторник, 26.01.2016, 20:40
 
Ответить
Сообщениетему переместили в outlook, только она тут вялая какая-то...

макрос для эксель

а если идти от обратного? может скрипт читать текст из ячейки и помещать его в тело письма?

а вообще я так сам себе думаю, если скрипт работает в excel'e то должен работать и в outlook'e, ведь среда у них одна и та же... или я что-то путаю?

Автор - viktorflam
Дата добавления - 26.01.2016 в 20:37
Nic70y Дата: Вторник, 26.01.2016, 21:52 | Сообщение № 6
Группа: Друзья
Ранг: Экселист
Сообщений: 8712
Репутация: 2262 ±
Замечаний: 0% ±

Excel 2010
может скрипт читать текст из ячейки и помещать его в тело письма?

'текст письма
.Body = Cells(7, 14)

то должен работать и в outlook'e
не соображаю в этом:(
ну этот код в outlook'e точно не будет работать.


ЮMoney 41001841029809
 
Ответить
Сообщение
может скрипт читать текст из ячейки и помещать его в тело письма?

'текст письма
.Body = Cells(7, 14)

то должен работать и в outlook'e
не соображаю в этом:(
ну этот код в outlook'e точно не будет работать.

Автор - Nic70y
Дата добавления - 26.01.2016 в 21:52
viktorflam Дата: Среда, 27.01.2016, 21:49 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 0% ±

Nic70y, http://www.outlookcode.com/codedetail.aspx?id=141 тут что-то подобное, посмотри, поможет мне?
 
Ответить
СообщениеNic70y, http://www.outlookcode.com/codedetail.aspx?id=141 тут что-то подобное, посмотри, поможет мне?

Автор - viktorflam
Дата добавления - 27.01.2016 в 21:49
Nic70y Дата: Пятница, 29.01.2016, 21:31 | Сообщение № 8
Группа: Друзья
Ранг: Экселист
Сообщений: 8712
Репутация: 2262 ±
Замечаний: 0% ±

Excel 2010
посмотри, поможет мне?

не соображаю в этом:(

Макрос, который я выложил, был у меня в файле, кроме него
был список имейлов, имя, обращение (типа Уважаемый), статус, основной текст.
циклом проходил и отправлял письмо каждому с ссот. именем и обращением.
Файл сломался вместе с системой, да и мне он не нужен - делал для других (по этому и не восстанавливал),
остался этот макрос в блокноте вот я его и скопипастил, т.к. тема была в ВБА,
если бы она изначально была в outlook, то и не отвечал бы, т.к. им вообще не пользуюсь и не соображаю


ЮMoney 41001841029809
 
Ответить
Сообщение
посмотри, поможет мне?

не соображаю в этом:(

Макрос, который я выложил, был у меня в файле, кроме него
был список имейлов, имя, обращение (типа Уважаемый), статус, основной текст.
циклом проходил и отправлял письмо каждому с ссот. именем и обращением.
Файл сломался вместе с системой, да и мне он не нужен - делал для других (по этому и не восстанавливал),
остался этот макрос в блокноте вот я его и скопипастил, т.к. тема была в ВБА,
если бы она изначально была в outlook, то и не отвечал бы, т.к. им вообще не пользуюсь и не соображаю

Автор - Nic70y
Дата добавления - 29.01.2016 в 21:31
Мир MS Excel » Вопросы и решения » Excel и другие приложения » Outlook » Вставка текста в тело письма outlook (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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