Kui peate sageli teatud raamatuid või lehti e-postiga välja saatma, siis oleksite pidanud märkama, et seda protseduuri ei saa nimetada kiireks. Kui teete seda "klassikaliselt", siis vajate:
- avage meiliprogramm (nt Outlook)
- luua uus sõnum
- sisestage aadress, teema ja tekst
- lisa sõnumile fail (ärge unustage!)
- klõpsake nuppu Saada
Tegelikult saab kirju hõlpsasti otse Excelist saata mitmel erineval viisil. Mine…
1. meetod: manustatud saatmine
Kui teil on veel vana hea Excel 2003, siis on kõik lihtne. Avage soovitud raamat/leht ja valige menüüst Fail – Saada – Sõnum (Fail – Saada – kirja saaja). Avaneb aken, kus saate valida ühe kahest saatmise võimalusest:
Esimesel juhul lisatakse praegune raamat sõnumile manusena, teisel juhul läheb aktiivse lehe sisu tekstitabelina (ilma valemiteta) otse sõnumiteksti.
Lisaks menüü Fail – esita (Fail — Saada) on veel mõned eksootilisemad saatmisvõimalused:
- Sõnum (ülevaatamiseks) (Meili saaja ülevaatamiseks) – saadetakse kogu töövihik ja samal ajal lülitatakse sellel sisse muudatuste jälgimine ehk hakkab selgelt fikseerima – kes, millal ja mis lahtrites milliseid muudatusi tegi. Seejärel saate kuvada menüüs tehtud muudatusi Teenindus – parandused – tõstke parandused esile (Tööriistad — Jälgi muudatusi — Tõstke esile muudatused) või vahekaardil Ülevaatus – parandused (Ülevaatamine – muudatuste jälgimine) See näeb välja umbes selline:
Värvilised raamid tähistavad dokumendis tehtud muudatusi (igal kasutajal on erinev värv). Kui hõljutate hiirekursorit, avaneb märkmelaadne aken üksikasjaliku kirjeldusega selle kohta, kes, mida ja millal selles lahtris muudeti. Väga mugav on dokumentide ülevaatamiseks, kui näiteks alluvate aruannet toimetad või ülemus sinu oma.
- Mööda marsruuti (Marsruutimise adressaat) – teade, kuhu teie raamat manustatakse, läbib adressaatide ahela, millest igaüks saadab selle automaatselt edasi, nagu teatepulk. Soovi korral saate määrata sõnumi ahela lõpus teile tagasi pöörduma. Saate lubada muudatuste jälgimise, et näha lõimes iga inimese tehtud muudatusi.
Uues Excelis 2007/2010 on olukord veidi erinev. Nendes versioonides peate raamatu posti teel saatmiseks valima nupu Office (Kontori nupp) või vahekaart fail (Fail) ja meeskond Saada (Saada). Järgmisena pakutakse kasutajale saatmisvalikuid:
Pange tähele, et uutes versioonides on kadunud võimalus saata töövihikust eraldi leht kirja sisusse sisestatuna – nagu see oli Excel 2003 ja uuemates versioonides. Ainus võimalus on saata kogu fail. Aga oli kasulik võimalus saata tuntud PDF-vormingus ja vähemtuntud XPS-is (sarnaselt PDF-ile, kuid lugemiseks pole vaja Acrobat Readerit – see avaneb otse Internet Exploreris). Käsu raamatu ülevaatamiseks saata saab kiirjuurdepääsupaneelil lisanupuna välja tõmmata Fail – Valikud – Kiirjuurdepääsu tööriistariba – Kõik käsud – Saada ülevaatamiseks (Fail — Valikud — Kiirjuurdepääsu tööriistariba — Kõik käsud — Saada ülevaatamiseks).
2. meetod. Lihtsad makrod saatmiseks
Makro saatmine on palju lihtsam. Visual Basicu redaktori avamine menüü kaudu Teenus – makro – Visual Basicu redaktor (Tööriistad – makro – Visual Basicu redaktor), sisestage uus moodul menüüsse Sisesta – moodul ja kopeerige nende kahe makro tekst sinna:
Sub SendWorkbook() ActiveWorkbook.SendMail Recipients:="[email protected]", Subject:="Лови файлик" End Sub Sub SendSheet() ThisWorkbook.Sheets("Лист1").Kopeeri ActiveWorkbookiga .Saada meili saajad:="[meili saajad:" Protected]", Subject:="Püüdke fail kinni" .Close SaveChanges:=Vale lõpp koos lõpu alam Pärast seda saab kopeeritud makrosid menüüs käivitada Teenus – makro – makrod (Tööriistad – makro – makrod). Saada tööraamat saadab kogu praeguse raamatu määratud aadressile ja Saada leht — Leht1 manusena.
Kui käivitate makro, võtab Excel ühendust Outlookiga, mille tulemusel kuvatakse ekraanil järgmine turvateade:
Oodake, kuni nupp Lahendama muutub aktiivseks ja klõpsake seda oma esitamise kinnitamiseks. Pärast seda paigutatakse automaatselt genereeritud kirjad kausta Lahkuv ja saadetakse adressaatidele Outlooki esmakordsel käivitamisel või, kui see töötab, kohe.
3. meetod. Universaalne makro
Ja kui soovite saata mitte praegust raamatut, vaid mõnda muud faili? Ja sõnumi teksti oleks ka tore sättida! Eelnevad makrod siinkohal ei aita, kuna neid piiravad Exceli enda võimalused, kuid saate luua makro, mis hakkab Excelist Outlooki haldama – loo ja täitke uus sõnumiaken ning saatke see. Makro näeb välja selline:
Sub SendMail() Dim OutApp As Object Dim OutMail As Object Dim cell as Range Application.ScreenUpdating = Vale Määra OutApp = CreateObject("Outlook.Application") 'käivitage Outlook peidetud režiimis OutApp.Session.Logon On Error GoTo cleanup 'kui mitte start - exit Set OutMail = OutApp.CreateItem(0) 'loo uus sõnum On Error Resume Next 'täitke sõnumiväljad With OutMail .To = Range("A1").Value .Subject = Range("A2"). Väärtus .Body = Vahemik("A3").Väärtus .Attachments.Add Range("A4").Väärtus 'Saada saab asendada käsuga Display, et näha sõnumit enne saatmist .Saada Lõpeta veaga GoTo 0 Määra OutMail = Pole puhastust : Määra OutApp = Pole rakendust. ScreenUpdating = True End Sub Aadress, teema, sõnumi tekst ja manustatud faili tee peavad olema aktiivse lehe lahtrites A1:A4.
- Grupipostitus Excelist PLEXi lisandmooduliga
- Makrod meilide saatmiseks Excelist Lotus Notesi kaudu, autor Dennis Wallentin
- Mis on makrod, kuhu Visual Basicus makrokoodi sisestada
- Meilide loomine funktsiooniga HYPERLINK