Китепти же баракчаны электрондук почта аркылуу жөнөтүү

Эгер сиз көп учурда электрондук почта аркылуу белгилүү бир китептерди же баракчаларды жөнөтүүгө туура келсе, анда бул процедураны тез деп айтууга болбойт экенин байкаган болушуңуз керек. Эгер сиз муну "классикалык" кылсаңыз, анда сизге керек:

  • электрондук почта программасын ачуу (мисалы, Outlook)
  • жаңы билдирүү түзүү
  • даректи, теманы жана текстти териңиз
  • билдирүүгө файлды тиркөө (унутуп алба!)
  • баскычты чыкылдатыңыз жиберүү

Чынында, почтаны оңой эле Excel'ден ар кандай жолдор менен жөнөтсө болот. Барыңыз…

Метод 1: Камтылган жөнөтүү

Эгер сизде дагы эле эски Excel 2003 бар болсо, анда баары жөнөкөй. Керектүү китепти/баракты ачып, менюдан тандаңыз Файл – Жөнөтүү – Кабар (Файл — Жөнөтүү — Почтаны алуучуга). Терезе ачылат, анда сиз жөнөтүүнүн эки вариантынын бирин тандай аласыз:

Биринчи учурда, учурдагы китеп билдирүүгө тиркеме катары кошулат, экинчи учурда, учурдагы барактын мазмуну тексттик таблица катары билдирүүнүн текстине түз кирет (формулаларсыз).

Мындан тышкары, меню Файл - Тапшыруу (Файл — жөнөтүү) дагы бир нече экзотикалык жеткирүү параметрлери бар:

 

  • Билдирүү (карап чыгуу үчүн) (Карап чыгуу үчүн катты алуучу) – бүт жумушчу китеп жөнөтүлөт жана ошол эле учурда ал үчүн өзгөрүүлөргө көз салуу күйгүзүлөт, башкача айтканда, ким, качан жана кайсы уячаларда кандай өзгөртүүлөрдү киргизгени так белгилене баштайт. Андан кийин менюда жасалган өзгөртүүлөрдү көрсөтө аласыз Кызмат - Түзөтүүлөр - Оңдоолорду бөлүп көрсөтүү (Куралдар — Өзгөртүүлөргө көз салуу — Өзгөртүүлөрдү бөлүп көрсөтүү) же өтмөктө Карап чыгуу – Түзөтүүлөр (Карап чыгуу — Өзгөрүүлөргө көз салуу) Бул окшош көрүнөт:

    Түстүү жээкчелер документке киргизилген өзгөртүүлөрдү белгилейт (ар бир колдонуучу башка түскө ээ). Чычканды алып барганда, бул уячада ким, эмне жана качан өзгөртүлгөнү толук сүрөттөлгөн жазуу түрүндөгү терезе пайда болот. Бул, мисалы, сиз кол астыңыздагылардын отчетун оңдогондо же начальник сиздикин оңдогондо, документтерди кароо үчүн абдан ыңгайлуу.

  • Маршрут боюнча (Багыттоочу алуучу) – китебиңиз тиркеле турган билдирүү алуучулардын чынжырынан өтөт, алардын ар бири аны автоматтык түрдө андан ары карай, таягы сыяктуу. Кааласаңыз, билдирүүнү чынжырдын аягында сизге кайтаруу үчүн орното аласыз. Жиптеги ар бир адам жасаган түзөтүүлөрдү көрүү үчүн өзгөртүүгө көз салууну иштетсеңиз болот.

Жаңы Excel 2007/2010-да абал бир аз башкача. Бул версияларда китепти почта аркылуу жөнөтүү үчүн баскычты тандоо керек Office (Офис баскычы) же өтмөк File (Файл) жана команда жиберүү (Жөнөтүү). Андан кийин, колдонуучуга жөнөтүү параметрлеринин топтому сунушталат:

Жаңы версияларда каттын корпусуна киргизилген иш китебинин өзүнчө барагын жөнөтүү мүмкүнчүлүгү Excel 2003 жана андан кийинки версиялардагыдай жоголуп кеткендигин эске алыңыз. Бардык файлды жөнөтүү гана калган. Бирок белгилүү PDF форматында жана анча белгилүү эмес XPS (PDF окшош, бирок Acrobat Reader окуусун талап кылбайт – ал түздөн-түз Internet Explorerде ачылат) жөнөтүү үчүн пайдалуу мүмкүнчүлүк бар болчу. Китепти карап чыгууга жөнөтүү буйругун тез жетүү панелиндеги кошумча баскыч катары чыгарса болот Файл – Параметрлер – Ыкчам жетүү куралдар панели – Бардык буйруктар – Карап чыгууга жөнөтүү (Файл — Параметрлер — Ыкчам жетүү куралдар панели — Бардык буйруктар — Карап чыгууга жөнөтүү).

Метод 2. Жөнөкөй макростор

Макрос жөнөтүү бир топ жеңил. Меню аркылуу Visual Basic редакторун ачуу Кызмат – Макро – Visual Basic редактору (Куралдар — Макро — Visual Basic редактору), менюга жаңы модулду киргизиңиз Кыстаруу – модуль жана бул эки макростун текстин ошол жерге көчүрүңүз:

Sub SendWorkbook() ActiveWorkbook.SendMail Recipients:="[email protected]", Subject:="Лови файлик" End Sub Sub Sub SendSheet() ThisWorkbook.Sheets("List1").Copy with ActiveWorkbook .SendMail Recipients:="[email. protected]", Subject:="Файлды карма" .Close SaveChanges:=False End With End Sub Subject:="Файлды кармоо"

Андан кийин, көчүрүлгөн макросторду менюда иштетсе болот Кызмат – Макро – Макрос (Куралдар — Макрос — Макростар). SendWorkbook бардык учурдагы китепти көрсөтүлгөн дарекке жөнөтөт, жана SendSheet — Барак1 тиркеме катары.

Макрону иштеткенде, Excel Outlook менен байланышат, бул экранда төмөнкү коопсуздук билдирүүсүн пайда кылат:

баскычка чейин күтө тур Solva жигердүү болуп, тапшырууну ырастоо үчүн аны басыңыз. Андан кийин, автоматтык түрдө түзүлгөн билдирүүлөр папкага жайгаштырылат чыккан жана сиз Outlook'ту биринчи жолу баштаганда алуучуларга жөнөтүлөт же ал иштеп турса, дароо.

Метод 3. Универсалдуу макро

Эгер сиз учурдагы китепти эмес, башка файлды жөнөткүңүз келсе? Жана билдирүүнүн тексти да коюлса жакшы болмок! Мурунку макростор бул жерде жардам бербейт, анткени алар Excelдин өзүнүн мүмкүнчүлүктөрү менен чектелген, бирок сиз Excelден Outlook башкара турган макрос түзө аласыз – жаңы билдирүү терезесин түзүп, толтуруп, аны жөнөтүңүз. Макро төмөнкүдөй көрүнөт:

Sub SendMail() Dim OutApp Объект катары Dim OutMail Объект катары күңүрт уяча катары Диапазон Application.ScreenUpdating = False Set OutApp = CreateObject("Outlook.Application") 'OutApp.Session.Logon жашырылган режимде Outlook баштаңыз OutApp.Session.Logon On Ката Тазалоого өтүү 'болбосо. башталды - чыгуу Set OutMail = OutApp.CreateItem(0) 'жаңы билдирүү түзүү Ката боюнча улантуу Кийинки 'билдирүү талааларын OutMail менен толтуруңуз .To = Range("A1").Value .Subject = Range("A2"). Value .Body = Range("A3").Value .Attachments.Add Range("A4").Value 'Send дегенди Дисплей менен алмаштырса болот. : Set OutApp = Эч нерсе жок Application.ScreenUpdating = True End Sub

Дареги, темасы, билдирүүнүн тексти жана тиркелген файлдын жолу учурдагы барактын A1:A4 уячаларында болушу керек.

  • PLEX кошумчасы менен Excelден топтук почта жөнөтүү
  • Деннис Уоллентин тарабынан Lotus Notes аркылуу Excelден кат жөнөтүү үчүн макрос
  • Макрос деген эмне, Visual Basic программасына макрокодду кайда киргизүү керек
  • HYPERLINK функциясы менен электрондук каттарды түзүү

 

Таштап Жооп