Неофициальный форум для инженеров, технологов и операторов Почты России


    Отправка почты сразу из Excel

    Поделиться
    avatar
    Rakot
    Эксперт
    Эксперт

    Сообщения : 393
    Очки : 448
    Репутация : 27
    Дата регистрации : 2014-09-13
    Откуда : Хьёрвард

    Отправка почты сразу из Excel

    Сообщение автор Rakot в Чт Фев 05 2015, 16:24

    А для чего это нужно?
    Вот если у Вас в отделения сидят бабушки, которым каждый раз надо помоч отправить по почте очередную таблицу с каким-нибудь отчетом, а сами они никак не могут запомнить как пользоватся эл.почтой, а Вам уже надоело каждый месяц объяснять как это делается и отпрвлять за них.

    Отправка из Excel
    личную книгу адресов PERSONAL.XLSB нужно разместить в C:\Documents and Settings\Имя_пользователя\Application Data\Microsoft\Excel\XLSTART

    открываем ее в excel'е -> заходим на вкладку Разработчик -> Visual basic. Находим в "Modules" модуль с названием "Module1"
    листаем чуть ниже середины до

    Set cmdSubBarCtrl = MyNewMenu.Controls.Add(Type:=msoControlButton)
           With cmdSubBarCtrl
               .BeginGroup = True
               .FaceId = 356
               .Caption = "&Справки для Татьяны"
               .OnAction = "'send ""adress@mail.ru"",""Тут_тема_письма"" '"
          End With

    и изменяем
    Caption = назвние кнопки на панели в Excel
    OnAction = адрес получателя и тема письма

    Если нет вкладки Разработчик то в парамтрах Excel'я надо включить отображение вкладки.

    теперь данные отправителя:
    Запустить EmailSettings.xls и настроить данные почтового аккаунта
    или отредактировать mail_settings.reg и запустить его

    Вот так это выглядит в 2007


    в 2003 тоже работает, в других не проверял.

      Текущее время Вт Авг 14 2018, 12:23