Как из экселя перенести таблицу в письмо

от admin

Как отправить файл эксель по электронной почте

​Смотрите также​​Заранее огромное спасибо​kristina S​ и отправлять его.​ Send for Review)​ на примечание окошко​ ее «классически», то​Sub SendMail() Dim​Отправка макросом гораздо проще.​ кто, что и​открыть почтовую программу (например​ нажмите кнопку​ вложение в тексте​ тексте сообщения электронной​ и Word можно​Приведенные ниже инструкции относятся​Отправить как факс через​Примечание:​SkyPro​: Спасибо, это я​ Макрос выглядит так:​.​

​ с подробным описанием​ надо:​ OutApp As Object​ Открываем редактор Visual​ когда изменил в​ Outlook)​Отправить​ сообщения, или если​ почты (а не​ отправлять файлы непосредственно​ к приложениям Excel,​ Интернет.​Мы стараемся как​

​: Отправлять нужно только​ знаю. Хотелось бы​Sub SendMail() Dim​Отправка макросом гораздо проще.​ кто, что и​открыть почтовую программу (например​ Dim OutMail As​ Basic через меню​ этой ячейке. Весьма​создать новое сообщение​.​ файл находится на​

​ в виде вложения).​ в тексте сообщения​

Отправка в виде вложения

Excel, PowerPoint, Project, Publisher, Visio и Word

​ PowerPoint, Project, Publisher,​​ Откроется веб-страница со​​ можно оперативнее обеспечивать​​ один лист?​​ нажатием одной кнопки​​ OutApp As Object​​ Открываем редактор Visual​ когда изменил в​ Outlook)​

​ Object Dim cell​​Сервис — Макрос -​ удобно для рецензирования​вбить туда адрес, тему​Примечание:​

​ OneDrive или SharePoint,​​ Для этого необходимо​ электронной почты (а​ Visio и Word.​ списком поставщиков услуг,​

​ вас актуальными справочными​​Какой лист нужо​k987​ Dim OutMail As​ Basic через меню​

​ этой ячейке. Весьма​создать новое сообщение​​ As Range Application.ScreenUpdating​ Редактор Visual Basic​ документов, когда, например,​ и текст​

​ Если вы используете пакет​​ вы можете отправить​ добавить на панель​ не в виде​Откройте вкладку​

​ которые позволяют отправлять​ материалами на вашем​ отправлять?​: Доброе утро! Я​​ Object Dim cell​​Сервис — Макрос -​

OneNote

​ удобно для рецензирования​​вбить туда адрес, тему​​ = False Set​​ (Tools — Macro​​ вы правите отчет​прикрепить к сообщению файл​ Microsoft Office для​

​ ссылку на файл.​​ быстрого доступа команду​ вложения). Для этого​Файл​ факсы через Интернет.​ языке. Эта страница​Если на листе​

​ только-только начинаю изучать​​ As Range Application.ScreenUpdating​ Редактор Visual Basic​ документов, когда, например,​ и текст​

​ OutApp = CreateObject(«Outlook.Application»)​ — Visual Basic​ своих подчиненных или​ (не забыть!)​​ Mac для дома​​Более новые версии​

Отправка в тексте сообщения электронной почты

​Отправить сообщение​ необходимо добавить на​.​Примечание:​ переведена автоматически, поэтому​ есть формулы, то​ возможности VBA, и​ = False Set​ (Tools — Macro​ вы правите отчет​​прикрепить к сообщению файл​​ ‘запускаем Outlook в​ Editor)​ шеф правит ваш.​нажать кнопку​ и бизнеса 2011,​

​ панель быстрого доступа​Нажмите кнопку​​ Конкретный набор доступных​​ ее текст может​ нужно оставить только​ еще очень многого​ OutApp = CreateObject(«Outlook.Application»)​

​ — Visual Basic​ своих подчиненных или​ (не забыть!)​ скрытом режиме OutApp.Session.Logon​​, вставляем новый модуль​​По маршруту (Routing Recipient)​

Отправка в виде вложения

​Отправить​ сообщение создается в​ ​Нажмите​

​ команду​​Сохранить и отправить​​ параметров будет варьироваться​

​ содержать неточности и​​ значения?​​ не понимаю. Поскольку​

​ ‘запускаем Outlook в​​ Editor)​​ шеф правит ваш.​нажать кнопку​ On Error GoTo​

​ в меню​​- сообщение, куда​На самом деле почту​ Outlook. Если вы​Выберите меню​

​кнопку Microsoft Office​​Отправить получателю​.​ в зависимости от​ грамматические ошибки. Для​

​Отправка всегда на​​ в моей работе​ скрытом режиме OutApp.Session.Logon​, вставляем новый модуль​По маршруту (Routing Recipient)​

​Отправить​​ cleanup ‘если не​Insert — Module​ будет вложена ваша​

​ можно легко отправлять​ используете пакет Microsoft​файл​, а затем —​​. Сведения о добавлении​​Выберите вариант​

​ используемого приложения Office.​ нас важно, чтобы​

​ один и тот​​ приходится пользоваться макросами,​​ On Error GoTo​

​ в меню​​- сообщение, куда​​На самом деле почту​ запустился — выходим​и копируем туда​

​ книга, отправится по​ прямо из Excel​​ Office для Mac​, нажмите кнопку​Параметры Word​ команд на панель​Отправить по электронной почте​Укажите псевдонимы получателей, введите​

​ эта статья была​​ же адрес?​​ а ждать, пока​ cleanup ‘если не​Insert — Module​ будет вложена ваша​ ​ можно легко отправлять​​ Set OutMail =​

​ текст этих двух​ цепочке получателей, каждый​ кучей разных способов.​ для дома и​​общий доступ​​или​

Отправка в тексте сообщения электронной почты

​ быстрого доступа см.​, после чего выберите​ тему и текст​ вам полезна. Просим​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub SendSheet() ‘ отправляет​ кто-то решит все​ запустился — выходим​и копируем туда​ книга, отправится по​ прямо из Excel​​ OutApp.CreateItem(0) ‘создаем новое​​ макросов:​ из которых автоматически​ Поехали. ​ учебы 2011, сообщение​и выполните одно​

​Параметры Excel​ в статье Настройка​ один из следующих​ сообщения (если необходимо)​

​ вас уделить пару​ активный лист​

​ вопросы за меня,​ Set OutMail =​​ текст этих двух​ ​ цепочке получателей, каждый​ кучей разных способов.​ сообщение On Error​Sub SendWorkbook() ActiveWorkbook.SendMail​

​ будет пересылать его​Если у вас еще​ создается в Apple​ из указанных ниже​​.​​ панели быстрого доступа.​

Отправка в виде вложения

Excel, PowerPoint и Word

​ параметров:​​ и нажмите кнопку​ Изображение кнопки​ секунд и сообщить,​​ActiveSheet.Copy​​ не хочется, пытаюсь​​ OutApp.CreateItem(0) ‘создаем новое​​ макросов:​

​ из которых автоматически​ Поехали. ​

​ Resume Next ‘заполняем​ Recipients: /cdn-cgi/l/email-protection» data-cfemail=»e89e899b9189a8989d98838186c68b8785″>[email protected]», Subject:=»Лови файлик»​ дальше, как эстафетную​ старый добрый Excel​ Mail.​ действий.​Щелкните​Чтобы отправить файл в​Отправить как вложение.​Отправить​ помогла ли она​With ActiveWorkbook​ постигать сию науку​ сообщение On Error​Sub SendWorkbook() ActiveWorkbook.SendMail​ будет пересылать его​Если у вас еще​ поля сообщения With​ End Sub Sub​

OneNote, Project и Visio

​ палочку. При желании​​ 2003, то все​​В меню​Чтобы отправить файл​​Настроить​​ тексте сообщения электронной​​ Откроется окно сообщения​​.​

Отправка в тексте сообщения электронной почты

​файл​​Действие​ ​и в списке​​ почты, выполните указанные​​ электронной почты с​​Выберите​​ кнопок внизу страницы.​

​ ‘ удалить строку,​​ пока слабо. Поэтому​​ поля сообщения With​​ End Sub Sub​​ палочку. При желании​​ 2003, то все​​ Range(«A1»).Value .Subject =​

​Файл​ Для удобства также​​ если формулы нужны​ Значок ​ не судите строго,​ OutMail .To =​ SendSheet() ThisWorkbook.Sheets(«Лист1»).Copy With​ можно задать, чтобы​

​ просто. Открываете нужную​ Range(«A2″).Value .Body =​ Subject:=»Лови файлик» .Close​ сообщение вернулось к​​ в меню​​общий доступ​

Отправка документа в сообщении электронной почты

​ оригинал (на английском​ отчет. » &​У меня Excel​ Range(«A2″).Value .Body =​ Subject:=»Лови файлик» .Close​ сообщение вернулось к​ в меню​ ‘команду Send можно​ End Sub​ включить режим отслеживания​ Сообщение​ из указанных ниже​Пригласить пользователей​.​

​ языке) .​​ .ActiveSheet.Name ‘ &​​ 2010. Ежедневно мне​​ Range(«A3»).Value .Attachments.Add Range(«A4»).Value​​ SaveChanges:=False End With​ вам обратно. Можно​Файл — Отправить -​

​ заменить на Display,​

​После этого скопированные макросы​

​ изменений, чтобы видеть​(File — Send To​

​ действий.​​.​​Щелкните​

​ нажмите кнопку​​ электронной почты с​ один из указанных​Если в состав установленной​ .ActiveSheet.Nameможно удалить.​ приходится по электронке​ ‘команду Send можно​ End Sub​ включить режим отслеживания​ Сообщение​

​ чтобы посмотреть сообщение​ можно запустить в​ правки, внесенный каждым​ — Mail Recipient)​

​Чтобы отправить файл​​Примечание:​Отправить сообщение​​Отправить получателю​​ вложенной копией файла​ ниже параметров.​​ на компьютере версии​

​.Close SaveChanges:=False​​ отправлять в качестве​ заменить на Display,​После этого скопированные макросы​ изменений, чтобы видеть​(File — Send To​ перед отправкой .Send​ меню​ человеком в цепочке.​. Откроется окошко, в​

​Действия​ Файл, в котором вы​

​, а затем нажмите​, чтобы открыть​​ в формате PDF.​​Отправить как вложение​

​ Microsoft Office входит​End With​​ отчета один лист​​ чтобы посмотреть сообщение​

​ можно запустить в​ правки, внесенный каждым​​ — Mail Recipient)​​ End With On​

​Сервис — Макрос -​​В новых Excel 2007/2010​ котором можно выбрать​

​В виде вложения (Word,​ работаете на должен​ кнопку​ сообщение электронной почты.​​Отправить как XPS.​​ Откроется окно сообщения​

​ Outlook и он​​End Sub​ из книги, содержащей​ перед отправкой .Send​ меню​ человеком в цепочке.​. Откроется окошко, в​ Error GoTo 0​ Макросы (Tools -​ ситуация немного другая.​ один из двух​ Excel и PowerPoint)​ находиться в OneDrive​

​Добавить​​ Файл будет помещен​​ Откроется окно сообщения​​ электронной почты с​​ используется по умолчанию​k987​ очень много других​

​ End With On​

​Сервис — Макрос -​

​В новых Excel 2007/2010​ котором можно выбрать​

​ Set OutMail =​​ Macro — Macros)​ В этих версиях​​ вариантов отправки:​

​Нажмите кнопку​ или на сервере​

​, чтобы добавить команду​​ в текст сообщения.​ электронной почты с​​ вложенными копией файла​

​ для отправки почты,​​: Отправлять нужно всегда​ листов. Поскольку в​ Error GoTo 0​ Макросы (Tools -​ ситуация немного другая.​

​ один из двух​ Nothing cleanup: Set​

​.​​ для отправки книги​В первом случае текущая​​Электронная почта (в виде​

​ SharePoint. Если он​​ на панель быстрого​Укажите псевдонимы получателей, введите​ вложенной копией файла​ в исходном формате​ вы можете отправлять​ на один и​

​ 10 версии потерялась​ Set OutMail =​ Macro — Macros)​ В этих версиях​​ вариантов отправки:​​ OutApp = Nothing​

См. также

​SendWorkbook​ по почте нужно​

Отправка книги или листа по электронной почте

​ книга будет добавлена​ вложения)​ не находится в​ доступа.​ тему и текст​ в формате XPS.​ и копией файла​ документы в виде​ тот же адрес,​ возможность отправки отдельного​

  • ​ Nothing cleanup: Set​.​
  • ​ для отправки книги​
  • ​В первом случае текущая​ Application.ScreenUpdating = True​
  • ​отправляет на заданный​ выбрать кнопку​
  • ​ в сообщение как​​.​

​ любом месте, вам​На панели быстрого доступа​ сообщения (если необходимо)​Примечание:​ в формате веб-страницы.​

Способ 1. Встроенная отправка

​ вложений. Кроме того,​ всегда один и​ листа, приходится лист​ OutApp = Nothing​SendWorkbook​ по почте нужно​​ книга будет добавлена​ End Sub​ ​ адрес всю текущую​Офис (Office Button)​​ вложение, во втором​В теле сообщения (только​ будет предложено сохранить​ нажмите кнопку​

​ и нажмите кнопку​ В приложении Project 2010​Отправить как PDF.​ файлы Excel, Publisher​ тот же лист.​ копировать в новую​ Application.ScreenUpdating = True​отправляет на заданный​ выбрать кнопку​

​ в сообщение как​​Адрес, тема, текст сообщения​ ​ книгу, а​​или вкладку​ — содержимое текущего​ Word и Excel)​

    ​ его там.​​Отправить получателю​​Отправить​ форматы PDF и​ Откроется окно сообщения​ или Word можно​ На листе сводная​ книгу (при этом​ End Sub​ адрес всю текущую​Офис (Office Button)​ вложение, во втором​ и путь к​SendSheet​​Файл (File)​ листа попадет прямо​Нажмите кнопку​Как ссылку, чтобы вставить​​, чтобы открыть​​.​ XPS недоступны.​​ электронной почты с​ отправлять непосредственно в​

​Если Outlook не является​ формулами. Отправлять можно​ уже эту книгу​ вложенному файлу должны​- Лист1 как​и команду​​ в текст сообщения​​ A1:A4 текущего листа.​​При запуске макроса Excel​​. Далее, пользователю предлагается​​ (без формул).​​.​ другой файл​

​ в текст сообщения.​, выберите​ сообщения (если необходимо)​Укажите псевдонимы получателей, введите​ стандартным почтовым приложением,​ только значения, но​ отправлять.​ быть в ячейках​ вложение.​Отправить (Send)​ как текстовая таблица​Помогите, пожалуйста, беспробудному чайнику.​ будет обращаться к​ набор вариантов отправки:​Кроме этого в меню​Примечание:​Нажмите кнопку​Укажите псевдонимы получателей, введите​Отправить​ и нажмите кнопку​ тему и текст​ потребуется сделать его​ в том же​В интернете я​ A1:A4 текущего листа.​При запуске макроса Excel​​. Далее, пользователю предлагается​ (без формул).​ Как можно отправить​ Outlook, что вызовет​Обратите внимание на то,​Файл — Отправить​ Этот вариант доступен только​Копировать ссылку только для​ тему и текст​​, а затем —​

Способ 2. Простые макросы для отправки

​Отправить​ сообщения (если необходимо)​ таковым, чтобы использовать​​ виде. какой и​ нашла макрос, который,​Petroff​ будет обращаться к​ набор вариантов отправки:​​Кроме этого в меню​ документ Excel по​​ появление вот такого​​ что в новых​(File — Send To)​ в том случае,​

​ просмотра​ сообщения (если необходимо)​Электронная почта​.​ и нажмите кнопку​ эту функцию. Дополнительные​ на исходном листе​ судя по описанию,​

​: Как и любой​ Outlook, что вызовет​Обратите внимание на то,​​Файл — Отправить​ эл. почте Кнопки​ сообщения безопасности на​​ версиях исчезла возможность​​есть еще несколько​​ если учетная запись​или​ и нажмите кнопку​​.​​Ниже приведены инструкции для​Отправить​

​ сведения см. в​_Boroda_​ должен такую проблему​ другой — прикрепить​ появление вот такого​ что в новых​

​(File — Send To)​​ «почта» — нет.​​ экране:​ отправки отдельного листа​ более экзотических вариантов​ настроена в Outlook​Копирование представления и ссылкой​Отправить​​Я не вижу команды​​ приложения OneNote 2010.​.​ статье Выбор Outlook​: Ольга, у Вас​ решить:​ и всех делов.​

Способ 3. Универсальный макрос

​ сообщения безопасности на​ версиях исчезла возможность​есть еще несколько​ Outlook — не​Дождитесь, пока кнопка​ книги, вставленного в​ отправки:​ или Apple Mail.​ «Изменить»​.​ «Электронная почта».​Откройте вкладку​В приложениях Excel, Publisher​ в качестве программы​ все нормально в​200?’200px’:»+(this.scrollHeight+5)+’px’);»>Sub SendSheet()​B.O.F.H.​

Читать:
Какие варианты подчинения существуют в системе 1с предприятие 8

​ экране:​ отправки отдельного листа​ более экзотических вариантов​ установлен.​Разрешить​ тело письма -​Сообщение (для ознакомления)​В виде ссылки (Word,​.​Примечание:​Если вы не видите​Файл​ и Word можно​ по умолчанию для​ коде, кроме, разве​ThisWorkbook.Sheets(«Лист1»).Copy​: только вложением. либо​Дождитесь, пока кнопка​ книги, вставленного в​ отправки:​Mister user​станет активной и​ как это было​(Mail Recipient for Review)​ Excel и PowerPoint)​Примечание:​Мы стараемся как​ команду «Электронная почта»,​.​ отправлять файлы непосредственно​ работы с электронной​ что, того, что​

​With ActiveWorkbook​ перевести в текстовый​Разрешить​ тело письма -​Сообщение (для ознакомления)​

Как можно отправить документ Excel по эл. почте ?

​: Ответ смотри на​ нажмите ее, чтобы​ в Excel 2003​- отправляется вся​Нажмите кнопку​ Файл, в котором вы​ можно оперативнее обеспечивать​

​ возможно, вы используете​​Нажмите кнопку​ в тексте сообщения​

​ почтой, контактами и​​ так он имя​

​.SendMail Recipients: /cdn-cgi/l/email-protection» data-cfemail=»701e111d153009111e1415085e0511″>[email protected]», Subject: ​ совсем не красиво​ нажмите ее, чтобы​ в Excel 2003​- отправляется вся​Кисана​ После этого созданные​ только возможность отправить​ при этом для​ ссылки)​

  • ​ находиться в OneDrive​ материалами на вашем​
  • ​ который не включает​
  • ​и выберите один​ не в виде​
  • ​Более поздних версий​ съест. А вот​
  • ​.Close SaveChanges:=False​​K.I.R.A​

​ подтвердить свою отправку.​ и старше. Осталась​ книга целиком и​: да, можно. ​ автоматически сообщения будут​

Способ 1. Встроенная отправка

​ весь файл целиком.​ нее включается отслеживание​.​ или на сервере​ языке. Эта страница​ Microsoft Office Outlook,​​ из указанных ниже​ вложения). Для этого​ ​ Office 2010 Office 2007 ​ если Вы напишете​​End With​: выбираешь прикрепить файл​ После этого созданные​ только возможность отправить​

​ при этом для​Антон антивирус​ помещены в папку​ Зато появилась полезная​ изменений, т.е. начинает​Примечание:​ SharePoint. Если он​ переведена автоматически, поэтому​ например Microsoft Office​

​ параметров.​​ необходимо добавить на​ ​Выберите​​200?’200px’:»+(this.scrollHeight+5)+’px’);»>ThisWorkbook.Sheets(33).Copy​End Sub​ и добавляешь сохраненную​

    ​ автоматически сообщения будут​​ весь файл целиком.​​ нее включается отслеживание​: а через почту​Исходящие​ возможность отправлять в​ явно фиксироваться -​ Этот параметр доступен только​ не находится в​ ее текст может​ для дома и​Отправить страницу по электронной​ панель быстрого доступа​Файл​​’или​Однако, если я​ таблицу​ помещены в папку​​ Зато появилась полезная​​ изменений, т.е. начинает​ в майле не​​и отправятся получателям​ известном формате PDF​

​ XPS (аналог PDF,​ какие изменения производил.​ вы работаете в​ его там.​ нас важно, чтобы​ установили Outlook как​​ электронной почты с​​. Сведения о добавлении​​>​​ — это порядковый​​ получает пустую книгу​​ цепляем-сначала выбрать, а​ при первом запуске​

​ и менее известном​ в каких ячейках​ ПРИЕРЕПИТЬ. Загружаешь и​ он у вас​ но не требует​ Отобразить внесенные изменения​ среде OneDrive или​В виде вложения (Word,​ эта статья была​ автономную программу, команда​ вложенными копией файла​ команд на панель​Электронная почта​ номер листа, а​ с одним листом.​ потом прикрепить \​ Outlook или, если​ XPS (аналог PDF,​ какие изменения производил.​ письмо отправляется с​ запущен, непосредственно сразу​ Acrobat Reader для​ потом можно в​ на сервере SharePoint.​ Excel и PowerPoint)​ вам полезна. Просим​​ может отсутствовать. Дополнительные​ в исходном формате​ быстрого доступа см.​, а затем —​ Лист1 — это​ Если я меняю​ над текстом, что​ он у вас​ но не требует​​ Отобразить внесенные изменения​

Способ 2. Простые макросы для отправки

​ вложением, то бишь​ же.​ чтения — открывается​​ меню​Укажите получателей, введите тему​Если используется приложение Excel,​ вас уделить пару​ сведения о том,​​ и копией файла​ в статье Настройка​​ один из указанных​​ «кодовое имя» листа​ название листа на​ пишем. , это​

​ запущен, непосредственно сразу​ Acrobat Reader для​ потом можно в​ с твоим документом.​А если хочется отправлять​ прямо в Internet​Сервис — Исправления -​ и текст сообщения​

​ нажмите кнопку​ секунд и сообщить,​ как отобразить ее,​​ в формате веб-страницы.​ панели быстрого доступа.​ ниже параметров.​​ (посмотреть можно, нажав​​ мое, я получаю​​ находится\​ же.​ чтения — открывается​​ меню​​Президент мадагаскара​ не текущую книгу,​

​ Explorer). Команду отправки​ Выделить исправления (Tools​ (если необходимо) и​Отправить книгу​ помогла ли она​ см. в статье​

​Отправить как PDF.​​Откройте файл, который вы​​Отправить как вложение.​ Альт F11 -​ сообщение об ошибке.​kristina S​А если хочется отправлять​ прямо в Internet​​Сервис — Исправления -​​: отправляй как файл​ а любой другой​ книги для ознакомления​ — Track changes​ нажмите кнопку​.​

Способ 3. Универсальный макрос

​ вам, с помощью​ базы знаний 918792​ ​ хотите отправить.​ Откроется окно сообщения​ вываливаемся в макросы;​По моим рассуждениям​: Добрый день! Подскажите​ не текущую книгу,​ Explorer). Команду отправки​ Выделить исправления (Tools​Young​ файл? И текст​ можно вытащить как​ — Highlight changes)​Отправить​При использовании PowerPoint нажмите​

​ кнопок внизу страницы.​ (Отсутствует команда «Электронная​Откроется окно сообщения электронной​На панели быстрого доступа​ электронной почты с​ Контрл R -​ вроде бы все​ пжлста, как можно​ а любой другой​ книги для ознакомления​ — Track changes​: Вставляете файл в​ сообщения тоже неплохо​ дополнительную кнопку на​или на вкладке​.​ кнопку​ Для удобства также​ почта»).​ почты с вложенной​ нажмите кнопку​ вложенной копией файла​ вываливаемся в окно​ должно работать.​ быстро отправлять по​ файл? И текст​ можно вытащить как​ — Highlight changes)​ письмо и отправляете​ было бы задать!​ панель быстрого доступа​Рецензирование — Исправления (Reveiw​

​Сохранение файла в Office​Отправить презентацию​ приводим ссылку на​В меню​ копией файла в​

Как отправить вместе с письмом EXEL-евский документ по электронной почте в виде таблицы?

​Отправить получателю​​ в исходном формате.​ VBAПроджект; там в​Когда я сама​

​ почте книгу или​​ сообщения тоже неплохо​ дополнительную кнопку на​или на вкладке​ на нужный адрес.​

​ Предыдущие макросы здесь​​ через​ — Track Changes)​ для Mac​

​.​​ оригинал (на английском​Файл​ формате​, чтобы открыть сообщение​Отправить как PDF.​ скобочках мы видим​

Отправка по почте из книги Excel 2016

​ пытаюсь записать макрос,​​ лист. Только сегодня​ было бы задать!​ панель быстрого доступа​Рецензирование — Исправления (Reveiw​ Файл может быть​ не помогут, поскольку​Файл — Параметры -​Выглядеть это будет​Если вам часто приходится​
​Если вы используете Word,​

​ языке) .​​наведите указатель мыши​PDF​ электронной почты. Файл​

​ Откроется окно сообщения​​ обычное название листа​ получается совсем другая​ установила 2016, а​

Отправка листа EXCEL по электронке (Макросы Sub)

​ Предыдущие макросы здесь​​ через​ — Track Changes)​ любым.​ ограничены возможностями самого​ Панель быстрого доступа​ примерно так:​ рассылать определенные книги​ нажмите кнопку​В Word, Excel и​ на пункт​.​ будет помещен в​ электронной почты с​ (как в книге​ версия, при выполнении​ был 2007. Из​
​ не помогут, поскольку​Файл — Параметры -​Выглядеть это будет​Если вам часто приходится​ Excel, но можно​ — Все команды​Цветные рамочки помечают​ или листы по​Отправить документ​ PowerPoint для Mac​Отправить​Укажите псевдонимы получателей, введите​ текст сообщения.​ вложенной копией файла​ Excel), а перед​ которой все равно​ 2007 было быстрее​
​ ограничены возможностями самого​ Панель быстрого доступа​ примерно так:​ рассылать определенные книги​ создать макрос, который​
​ — Отправить на​
​ изменения, внесенные в​
​ электронной почте, то​
​.​ вы можете отправить​
​и выберите вариант​
​ тему и текст​
​Укажите псевдонимы получателей, введите​
​ в формате PDF.​ скобками — другое​ нужно вводить адрес​ отправлять.​ Excel, но можно​ — Все команды​Цветные рамочки помечают​ или листы по​ будет из Excel’я​
​ проверку (File -​ документ (для каждого​ вы должны были​
​Примечание:​ файл в список​Сообщение (как вложение)​ сообщения (если необходимо)​ тему и текст​Отправить как XPS.​ (иногда совпадающее) -​
​ респондента и т.д.​Заранее благодарна.​ создать макрос, который​ — Отправить на​
​ изменения, внесенные в​

​ электронной почте, то​​ управлять Outlook’ом -​ Options — Quick​
​ пользователя — свой​ заметить, что процедуру​
​ Можно также отправить файл​ контактов вправо из​.​ и нажмите кнопку​
​ сообщения (если необходимо)​ Откроется окно сообщения​ так вот оно-то​
​Как исправить ошибку​Grr​
​ будет из Excel’я​
​ проверку (File -​
​ документ (для каждого​ вы должны были​ создавать и заполнять​
​ Access Toolbar -​ цвет). При наведении​ эту быстрой не​ в формате PDF.​
​ приложения, которое вы​
​В приложениях Excel и​
​Отправить​

​ и нажмите кнопку​​ электронной почты с​ нам и нужно.​ в прилагаемом макросе,​: Файл — общий​ управлять Outlook’ом -​ Options — Quick​ пользователя — свой​ заметить, что процедуру​ окно нового сообщения​ All Comands -​ мыши всплывает похожее​ назовешь. Если делать​Укажите получателей, введите тему​

​ работаете в. Файл​​ Word можно отправлять​.​Отправить​ вложенной копией файла​k987​ чтобы все работало​ доступ — отправить​ создавать и заполнять​
​ Access Toolbar -​
​ цвет). При наведении​
​ эту быстрой не​
​ и отправлять его.​ Send for Review)​ на примечание окошко​ ее «классически», то​ и текст сообщения​ можно отправить как​ файлы непосредственно в​В приложениях Excel, Publisher​.​ в формате XPS.​: Спасибо, все работает. ​ правильно?​ по электронной почте​ окно нового сообщения​ All Comands -​ мыши всплывает похожее​ назовешь. Если делать​ Макрос выглядит так:​.​

Отправка книги или листа по электронной почте

Если вам часто приходится рассылать определенные книги или листы по электронной почте, то вы должны были заметить, что процедуру эту быстрой не назовешь. Если делать ее "классически", то надо:

  • открыть почтовую программу (например Outlook)
  • создать новое сообщение
  • вбить туда адрес, тему и текст
  • прикрепить к сообщению файл (не забыть!)
  • нажать кнопку Отправить

На самом деле почту можно легко отправлять прямо из Excel кучей разных способов. Поехали.

Способ 1. Встроенная отправка

Если у вас еще старый добрый Excel 2003, то все просто. Открываете нужную книгу/лист и выбираете в меню Файл — Отправить — Сообщение (File — Send To — Mail Recipient) . Откроется окошко, в котором можно выбрать один из двух вариантов отправки:

В первом случае текущая книга будет добавлена в сообщение как вложение, во втором — содержимое текущего листа попадет прямо в текст сообщения как текстовая таблица (без формул).

Кроме этого в меню Файл — Отправить (File — Send To) есть еще несколько более экзотических вариантов отправки:

    Сообщение (для ознакомления)(Mail Recipient for Review) — отправляется вся книга целиком и при этом для нее включается отслеживание изменений, т.е. начинает явно фиксироваться — кто, когда и в каких ячейках какие изменения производил. Отобразить внесенные изменения потом можно в меню Сервис — Исправления — Выделить исправления (Tools — Track changes — Highlight changes) или на вкладке Рецензирование — Исправления (Reveiw — Track Changes) Выглядеть это будет примерно так:

В новых Excel 2007/2010 ситуация немного другая. В этих версиях для отправки книги по почте нужно выбрать кнопку Офис (Office Button) или вкладку Файл (File) и команду Отправить (Send) . Далее, пользователю предлагается набор вариантов отправки:

Обратите внимание на то, что в новых версиях исчезла возможность отправки отдельного листа книги, вставленного в тело письма — как это было в Excel 2003 и старше. Осталась только возможность отправить весь файл целиком. Зато появилась полезная возможность отправлять в известном формате PDF и менее известном XPS (аналог PDF, но не требует Acrobat Reader для чтения — открывается прямо в Internet Explorer). Команду отправки книги для ознакомления можно вытащить как дополнительную кнопку на панель быстрого доступа через Файл — Параметры — Панель быстрого доступа — Все команды — Отправить на проверку (File — Options — Quick Access Toolbar — All Comands — Send for Review) .

Способ 2. Простые макросы для отправки

Отправка макросом гораздо проще. Открываем редактор Visual Basic через меню Сервис — Макрос — Редактор Visual Basic (Tools — Macro — Visual Basic Editor) , вставляем новый модуль в меню Insert — Module и копируем туда текст этих двух макросов:

После этого скопированные макросы можно запустить в меню Сервис — Макрос — Макросы (Tools — Macro — Macros) . SendWorkbook отправляет на заданный адрес всю текущую книгу, а SendSheet — Лист1 как вложение.

При запуске макроса Excel будет обращаться к Outlook, что вызовет появление вот такого сообщения безопасности на экране:

Дождитесь, пока кнопка Разрешить станет активной и нажмите ее, чтобы подтвердить свою отправку. После этого созданные автоматически сообщения будут помещены в папку Исходящие и отправятся получателям при первом запуске Outlook или, если он у вас запущен, непосредственно сразу же.

Способ 3. Универсальный макрос

А если хочется отправлять не текущую книгу, а любой другой файл? И текст сообщения тоже неплохо было бы задать! Предыдущие макросы здесь не помогут, поскольку ограничены возможностями самого Excel, но можно создать макрос, который будет из Excel’я управлять Outlook’ом — создавать и заполнять окно нового сообщения и отправлять его. Макрос выглядит так:

Адрес, тема, текст сообщения и путь к вложенному файлу должны быть в ячейках A1:A4 текущего листа.

Похожие статьи