Kana iwe kazhinji uchifanirwa kutumira mamwe mabhuku kana mapepa ne-e-mail, saka iwe unofanirwa kunge waona kuti nzira iyi haigone kunzi nekukurumidza. Kana ukazviita "classically", saka unoda:
- vhura email chirongwa (semuenzaniso, Outlook)
- gadzira meseji nyowani
- nyora kero, musoro uye zvinyorwa
- batanidza faira kune meseji (usakanganwa!)
- tinya bhatani tuma
Muchokwadi, tsamba dzinogona kutumirwa nyore nyore kubva kuExcel muboka renzira dzakasiyana. Enda…
Method 1: Embedded Tumira
Kana iwe uchine yakanaka yekare Excel 2003, saka zvese zviri nyore. Vhura bhuku raunoda / pepa uye sarudza kubva pane menyu Faira - Tumira - Message (Faira - Tumira Kune - Mugamuchiri Wetsamba). Hwindo rinovhurika raunogona kusarudza imwe yezviviri sarudzo yekutumira:
Muchiitiko chekutanga, bhuku razvino rinozowedzerwa kune meseji sechibatanidzwa, mune yechipiri kesi, zviri mukati meyazvino pepa zvinopinda zvakananga mumeseji meseji setafura yemavara (isina mafomula).
Mukuwedzera, menyu Faira - Tumira (Faira - Tumira Ku) pane mamwe mashoma ekunze ekutumira sarudzo:
- Message (yekuongorora) (Mutambi Wetsamba Ongororo) - bhuku rose rebasa rinotumirwa uye panguva imwe chete kuchinja kwekutsvaga kunoshandurwa kwairi, kureva kunotanga kunyatsogadziriswa - ndiani, rini uye mune zvipi masero akaita shanduko. Iwe unogona ipapo kuratidza shanduko dzakaitwa mumenyu Sevhisi - Magadzirirwo - Simbisa zvigadziriso (Zvishandiso - Tevera shanduko - Simbisa shanduko) kana kuti pane tab Ongorora – Kururamisa (Ongorora - Tevera Shanduko) Ichatarisa chimwe chinhu seichi:
Mafuremu ane mavara anomaka shanduko dzakaitwa kugwaro (mushandisi wega wega ane ruvara rwakasiyana). Kana iwe uchitenderedza mbeva, hwindo-rakafanana rinobuda rine tsananguro yakadzama yekuti ndiani, chii uye kana chachinjwa muchitokisi ichi. Izvo zvakaringana pakuongorora magwaro, apo, semuenzaniso, iwe unogadzirisa chirevo chevari pasi pako kana mukuru anogadzirisa yako.
- Munzira (Mutambi Wenzira) - iyo meseji ichabatanidzwa nebhuku rako ichapfuura nepakati pevagamuchiri, imwe neimwe inozozviendesa mberi, sebaton. Kana uchida, unogona kuseta meseji kuti idzokere kwauri pakupera kweketani. Iwe unogona kugonesa shanduko yekutevera kuti uone kugadziridzwa kwakaitwa nemunhu wega wega mushinda.
MuExcel 2007/2010 itsva, mamiriro acho akasiyana zvishoma. Mune idzi shanduro, kutumira bhuku netsamba, unofanirwa kusarudza bhatani hofisi (Batani reHofisi) kana tab faira (Faira) uye timu tuma (Send). Tevere, mushandisi anopihwa seti yekutumira sarudzo:
Ndokumbira utarise kuti mushanduro nyowani, kugona kutumira pepa rakasiyana rebhuku rebasa rakaiswa mumuviri wetsamba rakanyangarika - sezvazvaive muExcel 2003 uye gare gare. Iyo yega sarudzo yasara ndeyekutumira faira rese. Asi pakanga paine mukana unobatsira wekutumira mune inozivikanwa PDF fomati uye iyo isinganyanyi kuzivikanwa XPS (yakafanana nePDF, asi haidi Acrobat Reader kuverenga - inovhura zvakananga muInternet Explorer). Murairo wekutumira bhuku kuti riongororwe unogona kuburitswa sebhatani rekuwedzera pane yekukurumidza kupinda panhivi kuburikidza Faira - Sarudzo - Kurumidza Kuwana Toolbar - Yese Mirairo - Tumira kuti Iongororwe (Faira - Sarudzo - Kurumidza Kuwana Toolbar - Yese Mirairo - Tumira kuti Iongororwe).
Method 2. Simple macros kutumira
Kutumira macro kuri nyore. Kuvhura iyo Visual Basic Mharidzo kuburikidza neMenu Basa - Macro - Visual Basic Edhita (Zvishandiso - Macro - Visual Basic Edhita), isa iyo module nyowani mumenyu Pinza – Module uye kopira zvinyorwa zveaya macros maviri ipapo:
Sub SendWorkbook() ActiveWorkbook.SendMail Recipients:="[email protected]", Subject:="Лови файлик" End Sub Sub SendSheet() ThisWorkbook.Sheets("Лист1").Copy With ActiveWorkbook .SendMail Recipients:="[email protected]", Musoro:="Bata faira" .Close SaveChanges:=Kupera Kwenhema NeKuguma Sub Mushure meizvozvo, iwo macros akakopwa anogona kumhanya mumenyu Basa – Macro – Macros (Zvishandiso - Macro - Macros). SendWorkbook inotumira bhuku rose razvino kukero yakataurwa, uye SendSheet - Sheet1 sechinhu chinonamatira.
Paunomhanyisa macro, Excel ichabata Outlook, izvo zvichaita kuti inotevera chengetedzo meseji ioneke pachiratidziri:
Mirira kusvika bhatani Gadzirisa inoshanda uye tinya pairi kuti usimbise kutumira kwako. Mushure meizvozvo, mameseji anogadzirwa otomatiki anozoiswa mufolda Kubuda uye ichatumirwa kune vanogamuchira kekutanga paunotanga Outlook kana, kana iwe uinayo ichimhanya, ipapo ipapo.
Nzira 3. Universal macro
Uye kana iwe uchida kutumira kwete bhuku razvino, asi chero rimwe faira? Uye iwo mameseji emeseji angave akanakawo kuseta! Iwo macros apfuura haabatsire pano, sezvo iwo akaganhurirwa nekugona kweExcel pachayo, asi iwe unogona kugadzira macro inozobata Outlook kubva kuExcel - gadzira uye uzadze hwindo remeseji uye utumire. Iyo macro inoita seizvi:
Sub SendMail() Dim OutApp As Object Dim OutMail As Object Dim cell As Range Application.ScreenUpdating = False Set OutApp = GadziraObject("Outlook.Application") 'tanga Outlook mune yakavanzwa mode OutApp.Session.Logon On Error GoTo cleanup' kana zvisiri yakatanga - buda Set OutMail = OutApp.CreateItem(0) 'gadzira meseji nyowani PaKukanganisa Resume Next 'zadza ndima dzemeseji NeOutMail .To = Range("A1") .Value .Subject = Range("A2"). Value .Body = Range("A3").Kukosha .Attachments.Add Range("A4").Kukosha 'Send inogona kutsiviwa neDisplay kuti uone meseji usati watumira .Send End With On Error GoTo 0 Set OutMail = Hapana chekuchenesa : Set OutApp = Nothing Application.ScreenUpdating = True End Sub Kero, musoro, mameseji emeseji uye nzira inoenda kune yakasungirirwa faira inofanirwa kunge iri mumaseru A1: A4 yepepa razvino.
- Kutumira kweBoka kubva kuExcel nePLEX Yekuwedzera-mukati
- Macros ekutumira tsamba kubva kuExcel kuburikidza neLotus Notes naDennis Wallentin
- Chii macros, kupi kwekuisa macro kodhi muVisual Basic
- Kugadzira maemail ane HYPERLINK basa