Kitob yoki varaqni elektron pochta orqali yuborish

Agar siz tez-tez ma'lum kitoblar yoki varaqlarni elektron pochta orqali yuborishingiz kerak bo'lsa, unda siz ushbu protsedurani tez deb atash mumkin emasligini payqagan bo'lishingiz kerak. Agar siz buni "klassik" qilsangiz, sizga kerak bo'ladi:

  • elektron pochta dasturini oching (masalan, Outlook)
  • yangi xabar yarating
  • manzil, mavzu va matnni kiriting
  • xabarga fayl qo'shing (unutmang!)
  • tugmachani bosing yuborish

Aslida, pochtani to'g'ridan-to'g'ri Exceldan turli xil usullar bilan osongina yuborish mumkin. Boring…

1-usul: o'rnatilgan yuborish

Agar sizda hali ham eski Excel 2003 bo'lsa, unda hamma narsa oddiy. Kerakli kitob/varaqni oching va menyudan tanlang Fayl - Yuborish - Xabar (Fayl — Yuborish — Pochta oluvchi). Yuborish uchun ikkita variantdan birini tanlashingiz mumkin bo'lgan oyna ochiladi:

Birinchi holda, joriy kitob xabarga ilova sifatida qo'shiladi, ikkinchi holda, joriy varaqning mazmuni to'g'ridan-to'g'ri xabar matniga matnli jadval sifatida kiradi (formulalarsiz).

Bundan tashqari, menyu Fayl - Yuborish (Fayl - Yuborish) Yana bir nechta ekzotik etkazib berish variantlari mavjud:

 

  • Xabar (ko'rib chiqish uchun) (Ko'rib chiqish uchun pochta qabul qiluvchisi) – butun ish kitobi jo‘natiladi va shu bilan birga u uchun o‘zgarishlarni kuzatish yoqiladi, ya’ni aniq belgilana boshlaydi – kim, qachon va qaysi kataklarda qanday o‘zgarishlar kiritganligi. Keyin menyuda kiritilgan o'zgarishlarni ko'rsatishingiz mumkin Xizmat - Tuzatishlar - Tuzatishlarni ajratib ko'rsatish (Asboblar — Oʻzgarishlarni kuzatish — Oʻzgarishlarni ajratib koʻrsatish) yoki yorliqda Ko'rib chiqish - tuzatishlar (Ko'rib chiqish - O'zgarishlarni kuzatish) Bu quyidagicha ko'rinadi:

    Rangli ramkalar hujjatga kiritilgan o'zgarishlarni belgilaydi (har bir foydalanuvchi boshqa rangga ega). Sichqonchani sichqonchaga olib borganingizda, ushbu katakchada kim, nima va qachon o'zgartirilganligi batafsil tavsifi bilan eslatmaga o'xshash oyna ochiladi. Hujjatlarni ko'rib chiqish uchun juda qulay, masalan, siz o'zingizning bo'ysunuvchilaringizning hisobotini tahrir qilsangiz yoki xo'jayin siznikini tahrir qilsa.

  • Yo'l bo'ylab (Marshrutni qabul qiluvchi) - kitobingiz biriktiriladigan xabar oluvchilar zanjiri orqali o'tadi, ularning har biri uni avtomatik ravishda tayoqcha kabi uzatadi. Agar xohlasangiz, xabarni zanjir oxirida sizga qaytarish uchun sozlashingiz mumkin. Mavzudagi har bir shaxs tomonidan kiritilgan tahrirlarni ko'rish uchun o'zgarishlarni kuzatishni yoqishingiz mumkin.

Yangi Excel 2007/2010 da vaziyat biroz boshqacha. Ushbu versiyalarda kitobni pochta orqali yuborish uchun tugmani tanlashingiz kerak idora (Ofis tugmasi) yoki tab Fayl (Fayl) va jamoa yuborish (Yuborish). Keyinchalik, foydalanuvchiga yuborish variantlari to'plami taklif etiladi:

E'tibor bering, yangi versiyalarda xatning tanasiga kiritilgan ish kitobining alohida varag'ini yuborish imkoniyati yo'qolgan - Excel 2003 va undan keyingi versiyalarda bo'lgani kabi. Qolgan yagona imkoniyat butun faylni yuborishdir. Ammo taniqli PDF formatida va kamroq taniqli XPS (PDF-ga o'xshash, lekin Acrobat Reader-ni o'qishni talab qilmaydi - u to'g'ridan-to'g'ri Internet Explorer-da ochiladi) yuborish uchun foydali imkoniyat bor edi. Kitobni ko'rib chiqish uchun yuborish buyrug'i orqali tezkor kirish panelidagi qo'shimcha tugma sifatida chiqarilishi mumkin Fayl - Variantlar - Tez kirish asboblar paneli - Barcha buyruqlar - Ko'rib chiqish uchun yuborish (Fayl — Variantlar — Tez kirish asboblar paneli — Barcha buyruqlar — Koʻrib chiqish uchun yuborish).

2-usul. Yuborish uchun oddiy makroslar

Makrosni yuborish ancha oson. Menyu orqali Visual Basic muharririni ochish Xizmat - Makro - Visual Basic muharriri (Asboblar — Makro — Visual Basic muharriri), yangi modulni menyuga kiriting Qo'shish - modul va bu ikki makrosning matnini u yerga ko'chiring:

Sub SendWorkbook() ActiveWorkbook.SendMail Recipients:="[email protected]", Subject:="Lovi fayl" End Sub Sub Sub Sub SendSheet() ThisWorkbook.Sheets("List1"). ActiveWorkbook bilan nusxalash .SendMail Recipients:="[email. himoyalangan]", Subject:="Faylni qo'lga olish" .Close SaveChanges:=False End with End Sub  

Shundan so'ng, nusxalangan makroslar menyuda ishga tushirilishi mumkin Xizmat - Makro - Makros (Asboblar — Makro — Makroslar). Ish kitobini yuborish butun joriy kitobni belgilangan manzilga yuboradi va SendSheet — 1-jadval ilova sifatida.

Makrosni ishga tushirganingizda, Excel Outlook bilan bog'lanadi, bu esa ekranda quyidagi xavfsizlik xabarining paydo bo'lishiga olib keladi:

Tugmachani kuting Hal qilish faollashadi va yuborishingizni tasdiqlash uchun ustiga bosing. Shundan so'ng, avtomatik ravishda yaratilgan xabarlar papkaga joylashtiriladi Chiqish va Outlookni birinchi marta ishga tushirganingizda yoki, agar u ishlayotgan bo'lsa, darhol qabul qiluvchilarga yuboriladi.

3-usul. Universal makros

Va agar siz joriy kitobni emas, balki boshqa faylni yubormoqchi bo'lsangiz? Va xabar matni ham o'rnatish yaxshi bo'lardi! Oldingi makroslar bu erda yordam bermaydi, chunki ular Excelning o'zi imkoniyatlari bilan cheklangan, ammo siz Excel-dan Outlook-ni boshqaradigan makrosni yaratishingiz mumkin - yangi xabar oynasini yarating va to'ldiring va uni jo'natib yuboring. Makro quyidagicha ko'rinadi:

Sub SendMail() Dim OutApp Ob'ekt sifatida Xiralashtiring OutMail Ob'ekt xira hujayra sifatida Range Application.ScreenUpdating = False Set OutApp = CreateObject("Outlook.Application") 'OutApp.Session.Logon Yashirin rejimda Outlookni ishga tushiring. boshlangan - chiqish OutMailni o'rnatish = OutApp.CreateItem(0) 'yangi xabar yaratish Xato haqida davom ettirish Keyingi 'xabar maydonlarini OutMail bilan to'ldiring .To = Range("A1").Value .Subject = Range("A2"). Qiymat .Body = Range("A3").Qiymat .Attachments.Add Range("A4").Value 'Send xabarni yuborishdan oldin ko'rish uchun Displey bilan almashtirilishi mumkin .Send End with Error GoTo 0 Set OutMail = Hech narsa tozalanmaydi : Set OutApp = Hech narsa ilovasi.ScreenUpdating = True End Sub  

Manzil, mavzu, xabar matni va biriktirilgan faylga yo'l joriy varaqning A1:A4 kataklarida bo'lishi kerak.

  • PLEX plaginiga ega Exceldan guruh pochtasi
  • Dennis Uolentin tomonidan Lotus Notes orqali Exceldan pochta jo'natish uchun makroslar
  • Makroslar nima, Visual Basic dasturida makro kodni qayerga kiritish kerak
  • HYPERLINK funksiyasi bilan elektron pochta xabarlarini yaratish

 

Leave a Reply