Turinys
Jei dažnai tenka išsiųsti tam tikras knygas ar lapus el. paštu, tuomet turėjote pastebėti, kad ši procedūra negali būti vadinama greita. Jei tai darote „klasikiškai“, jums reikia:
- atidaryti el. pašto programą (pvz., „Outlook“)
- sukurti naują pranešimą
- įveskite adresą, temą ir tekstą
- pridėkite failą prie pranešimo (nepamirškite!)
- spustelėkite mygtuką Siųsti
Tiesą sakant, paštą galima lengvai siųsti tiesiai iš „Excel“ įvairiais būdais. Eik…
1 būdas: įterptasis siuntimas
Jei vis dar turite seną gerą Excel 2003, tada viskas paprasta. Atidarykite norimą knygą/lapą ir pasirinkite iš meniu Failas – Siųsti – Pranešimas (Failas – Siųsti – Laiško gavėjas). Atsidarys langas, kuriame galėsite pasirinkti vieną iš dviejų siuntimo parinkčių:
Pirmuoju atveju dabartinė knyga bus pridėta prie pranešimo kaip priedas, antruoju atveju dabartinio lapo turinys pateks tiesiai į pranešimo tekstą kaip tekstinė lentelė (be formulių).
Be to, meniu Failas – pateikti (Failas – Siųsti į) Yra dar keletas egzotiškų siuntimo variantų:
- Žinutė (peržiūrai) (Laiško gavėjas peržiūrai) – išsiunčiama visa darbaknygė ir tuo pačiu jai įjungiamas pakeitimų sekimas, ty pradedamas aiškiai fiksuoti – kas, kada ir kokiose ląstelėse kokius pakeitimus atliko. Tada galite rodyti meniu atliktus pakeitimus Paslauga – pataisymai – paryškinkite pataisymus (Įrankiai – Stebėti pakeitimus – Paryškinti pakeitimus) arba skirtuke Apžvalga – pataisymai (Peržiūra – stebėti pakeitimus) Tai atrodys maždaug taip:
Spalvoti rėmeliai žymi dokumento pakeitimus (kiekvienas vartotojas turi skirtingą spalvą). Užvedus pelės žymeklį, pasirodo užrašą primenantis langas su išsamiu aprašymu, kas, ką ir kada pakeitė šioje langelyje. Labai patogu peržiūrėti dokumentus, kai, pavyzdžiui, redaguojate savo pavaldinių ataskaitą arba viršininkas redaguoja jūsų.
- Išilgai maršruto (Maršruto siuntimo gavėjas) – žinutė, prie kurios bus pridėta jūsų knyga, eis per gavėjų grandinę, kurių kiekvienas automatiškai persiųs ją toliau, kaip estafetė. Jei norite, galite nustatyti, kad pranešimas jums grįš grandinės pabaigoje. Galite įjungti pakeitimų stebėjimą, kad pamatytumėte kiekvieno gijoje dalyvaujančio asmens atliktus pakeitimus.
Naujojoje „Excel“ 2007/2010 versijoje situacija šiek tiek skiriasi. Šiose versijose, norėdami išsiųsti knygą paštu, turite pasirinkti mygtuką Office (Biuro mygtukas) arba skirtuką filė (Failas) ir komanda Siųsti (Siųsti). Tada vartotojui siūlomas siuntimo parinkčių rinkinys:
Atkreipkite dėmesį, kad naujose versijose nebeliko galimybės siųsti atskirą darbaknygės lapą, įdėtą į laiško turinį – kaip buvo Excel 2003 ir vėlesnėse. Liko vienintelė galimybė – siųsti visą failą. Tačiau buvo naudinga galimybė siųsti gerai žinomu PDF formatu ir mažiau žinomu XPS (panašus į PDF, bet skaityti nereikia Acrobat Reader – atsidaro tiesiai Internet Explorer). Komanda siųsti knygą peržiūrai gali būti ištraukta kaip papildomas mygtukas greitosios prieigos skydelyje per Failas – Parinktys – Greitos prieigos įrankių juosta – Visos komandos – Siųsti peržiūrėti (Failas – Parinktys – Greitos prieigos įrankių juosta – Visos komandos – Siųsti peržiūrėti).
2 būdas. Paprastos makrokomandos siųsti
Siųsti makrokomandą yra daug lengviau. „Visual Basic“ rengyklės atidarymas per meniu Paslauga – makrokomandos – „Visual Basic“ redaktorius (Įrankiai – makrokomandos – „Visual Basic“ redaktorius), įdėkite naują modulį į meniu Įterpimas – modulis ir ten nukopijuokite šių dviejų makrokomandų tekstą:
Sub SendWorkbook() ActiveWorkbook.SendMail Recipients:="[el. paštas apsaugotas]", Subject:="Лови файлик" Baigti antrinį antrinį elementą SendSheet() ThisWorkbook.Sheets("Лист1").Kopijuoti naudojant ActiveWorkbook .SendMail Recipients:="[el. Protected]", Subject:="Pagauk failą" .Close SaveChanges:=Klaidinga pabaiga su pabaiga Po to nukopijuotas makrokomandas galima paleisti meniu Paslauga – makrokomandos – makrokomandos (Įrankiai – makrokomandos – makrokomandos). SiųstiWorkbook siunčia visą dabartinę knygą nurodytu adresu ir SiųstiSheet — Lapas1 kaip priedas.
Kai paleisite makrokomandą, „Excel“ susisieks su „Outlook“, todėl ekrane pasirodys šis saugos pranešimas:
Palaukite, kol mygtukas Išspręsti tampa aktyvus ir spustelėkite jį, kad patvirtintumėte savo pateikimą. Po to automatiškai sugeneruoti pranešimai bus patalpinti į aplanką Išeinantis ir bus išsiųsti gavėjams pirmą kartą paleidus „Outlook“ arba, jei ji paleista, iškart.
3 metodas. Universali makrokomanda
O jei norite siųsti ne dabartinę knygą, o bet kokį kitą failą? Ir žinutės tekstą taip pat būtų malonu nustatyti! Ankstesnės makrokomandos čia nepadės, nes jas riboja pačios Excel galimybės, tačiau galite sukurti makrokomandą, kuri valdys Outlook iš Excel – sukurkite ir užpildykite naują žinutės langą ir išsiųskite. Makrokomandas atrodo taip:
Sub SendMail() Pritemdyti OutApp kaip objektą Pritemdyti OutMail kaip objektą Pritemdyti langelį kaip diapazoną Application.ScreenUpdating = Klaidinga Nustatyti OutApp = CreateObject("Outlook.Application") 'paleiskite "Outlook" paslėptu režimu OutApp.Session.Prisijungimo klaida Eikite į valymą, jei ne Pradėtas - išeiti Set OutMail = OutApp.CreateItem(0) 'sukurti naują pranešimą Įvykus klaidai Tęsti Next 'užpildykite pranešimo laukus naudodami OutMail .To = Range("A1").Value .Subject = Range("A2"). Reikšmė .Body = Diapazonas ("A3"). Vertė .Priedai. Pridėti diapazoną ("A4"). Reikšmė 'Siųsti gali būti pakeista į Display, kad peržiūrėtumėte pranešimą prieš siunčiant .Siųsti Pabaiga su klaida GoTo 0 Nustatyti OutMail = Nieko išvalyti : Nustatyti OutApp = Nothing Application.ScreenUpdating = True End Sub Adresas, tema, pranešimo tekstas ir kelias į pridėtą failą turi būti dabartinio lapo langeliuose A1:A4.
- Grupinis pašto siuntimas iš „Excel“ su PLEX priedu
- Makrokomandos, skirtos laiškų siuntimui iš „Excel“ naudojant „Lotus Notes“, pateikė Dennisas Wallentinas
- Kas yra makrokomandos, kur įterpti makrokomandos kodą „Visual Basic“.
- Laiškų kūrimas naudojant HYPERLINK funkciją