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

Вход

Регистрация

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

 

= Мир MS Excel/Отправить письмо через Outlook нескольким адресатам - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, китин  
Отправить письмо через Outlook нескольким адресатам
akobir Дата: Воскресенье, 10.07.2016, 13:37 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 201
Репутация: 9 ±
Замечаний: 0% ±

Excel 2010
Всем привет.
Поиск по форуму не помог.
Не могу разобраться, как впихнуть массив с адресатами из Excel в строку адресатов Outlookа через точку с запятой.
Буду признателен! :)

Файл прикрепляю.
К сообщению приложен файл: 0534893.xlsm (15.3 Kb)


e-mail: akobir.ismailov@gmail.com
 
Ответить
СообщениеВсем привет.
Поиск по форуму не помог.
Не могу разобраться, как впихнуть массив с адресатами из Excel в строку адресатов Outlookа через точку с запятой.
Буду признателен! :)

Файл прикрепляю.

Автор - akobir
Дата добавления - 10.07.2016 в 13:37
Pelena Дата: Понедельник, 11.07.2016, 10:00 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19403
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
akobir, если Вы просмотрите этот раздел (Outlook), то увидите, что большинство ответов содержат коды VBA


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщениеakobir, если Вы просмотрите этот раздел (Outlook), то увидите, что большинство ответов содержат коды VBA

Автор - Pelena
Дата добавления - 11.07.2016 в 10:00
SLAVICK Дата: Понедельник, 11.07.2016, 10:37 | Сообщение № 3
Группа: Модераторы
Ранг: Старожил
Сообщений: 2290
Репутация: 766 ±
Замечаний: 0% ±

2019
как впихнуть массив с адресатами из Excel в строку адресатов Outlookа через точку с запятой.

Наверное так :D :
[vba]
Код
sTo = Join(Application.Transpose(ThisWorkbook.Sheets("Итоги").Range("J1:J3")), ";")
[/vba]


Иногда все проще чем кажется с первого взгляда.
 
Ответить
Сообщение
как впихнуть массив с адресатами из Excel в строку адресатов Outlookа через точку с запятой.

Наверное так :D :
[vba]
Код
sTo = Join(Application.Transpose(ThisWorkbook.Sheets("Итоги").Range("J1:J3")), ";")
[/vba]

Автор - SLAVICK
Дата добавления - 11.07.2016 в 10:37
  • Страница 1 из 1
  • 1
Поиск:

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