Hogyan küldhetünk e-mailt egy meghatározott tartomány másolásával és beillesztésével az Excel e-mail törzsébe?
Sok esetben az Excel munkalap meghatározott tartalomtartománya hasznos lehet az e-mail kommunikáció során. Ebben a cikkben bemutatjuk az e-mail küldésének módját meghatározott tartományú beillesztéssel az Excel törzsébe.
E-mail küldése meghatározott tartományban beillesztve az Excel e-mail törzsébe
E-mail küldése egy meghatározott tartományba beillesztve az e-mail törzsébe egy csodálatos eszközzel
További oktatóanyagok az Excel levelezéséhez ...
E-mail küldése meghatározott tartományban beillesztve az Excel e-mail törzsébe
A következő VBA-kód segíthet egy tartomány másolásában és beillesztésében az Outlook e-mail törzsébe közvetlenül az Excel programban. Kérjük, tegye a következőket.
1. A munkalap tartalmazza a másolandó tartományt, nyomja meg a gombot más + F11 gombok egyszerre a Microsoft Visual Basic for Applications ablak.
2. A nyílásban Microsoft Visual Basic for Applications ablakot, kérjük kattintson Eszközök > Referenciák az alábbi képernyőképen látható.
3. Ban,-ben Referenciák - VBAProject párbeszédpanelt, kérjük, keresse meg és ellenőrizze a Microsoft Outlook Object Library lehetőséget, majd kattintson a gombra OK gombot.
4. kettyenés betétlap > Modulok, majd másolja és illessze be az alábbi VBA kódot a Modul ablakba.
VBA kód: E-mail küldése meghatározott tartományban beillesztve az Excel e-mail törzsébe
Sub Send_Email() 'Updated by Extendoffice 20200119 Dim xRg As Range Dim I, J As Long Dim xAddress As String Dim xEmailBody As String Dim xMailOut As Outlook.MailItem Dim xOutApp As Outlook.Application On Error Resume Next xAddress = ActiveWindow.RangeSelection.Address Set xRg = Application.InputBox("Please select range you need to paste into email body", "KuTools For Excel", xAddress, , , , , 8) If xRg Is Nothing Then Exit Sub Application.ScreenUpdating = False Set xOutApp = CreateObject("Outlook.Application") Set xMailOut = xOutApp.CreateItem(olMailItem) For I = 1 To xRg.Rows.Count For J = 1 To xRg.Columns.Count xEmailBody = xEmailBody & " " & xRg.Cells(I, J).value Next xEmailBody = xEmailBody & vbNewLine Next xEmailBody = "Hi" & vbLf & vbLf & " body of message you want to add" & vbLf & vbLf & xEmailBody & vbNewLine With xMailOut .Subject = "Test" .To = "happy.xuebi@163.com" .Body = xEmailBody .Display '.Send End With Set xMailOut = Nothing Set xOutApp = Nothing Application.ScreenUpdating = True End Sub
Megjegyzések:
- 1). Kérjük, módosítsa az e-mail törzsét a sorban xEmailBody = "Szia" & vbLf & vbLf & "hozzáadni kívánt üzenet törzse" & vbLf & vbLf & xEmailBody & vbNewLine amire szüksége van.
- 2). Kérjük, adja meg e-mail címzettjét és tárgyát (.To = happy.xuebi@163.com Subject = "teszt") sorok a kódban.
5. megnyomni a F5 gombot a kód futtatásához. A felbukkanóban Kutools for Excel párbeszédpanelen válassza ki az e-mail törzsébe beillesztendő tartományt, majd kattintson a gombra OK gomb. Lásd a képernyőképet:
6. Most létrejön egy e-mail a megadott címzettel, tárggyal, törzzsel és a kiválasztott Excel tartományral, kérjük, kattintson a gombra Küldés gombra az e-mail elküldéséhez. Lásd a bemutatott képernyőképet.
Megjegyzések: A VBA kód csak akkor működik, ha az Outlook programot használja e-mail programként.
E-mail küldése egy meghatározott tartományba beillesztve az e-mail törzsébe egy csodálatos eszközzel
Ha nem használja az Outlook programot, és továbbra is közvetlenül az Excel programban szeretne e-maileket küldeni, a megadott tartományadatokat beillesztve, nagyon ajánlom a Emaileket küld hasznossága Kutools for Excel neked. Ezzel a szolgáltatással csak konfigurálnia kell egy e-mail cím kimenő szerverét, majd a jövőben közvetlenül ezen az e-mail címen keresztül küldhet e-maileket az Excel programban.
Alkalmazás előtt Kutools for ExcelKérjük, először töltse le és telepítse.
1. Először készítenie kell egy levelezőlistát a szükséges mezőkkel.
- tippek: A levelezőlistának legalább 2 sort kell tartalmaznia, és az első sornak a fejlécnek kell lennie (Tegyük fel, hogy két e-mail címre szeretne e-mailt küldeni az Excel programban, kérjük, írja be ezt a két e-mail címet az „Email” fejléccel, ahogy az alábbi képernyőképen látható ).
- Alternatív megoldásként könnyen létrehozhat egy levelezőlistát a Levelezőlista létrehozása funkciót.
2. Válassza ki azt a tartományt, amelyhez hozzáadja az adatokat az e-mail törzséhez, majd nyomja meg a gombot Ctrl + C gombokat a másoláshoz.
3. Jelölje ki a teljes levelezőlistát (fejléceket is), kattintson a gombra Kutools Plus > Emaileket küld. Lásd a képernyőképet:
4. Ezután a Emaileket küld megjelenik a párbeszédpanel.
- 4.1) A kiválasztott levelezőlista elemei a megfelelő mezőkben kerülnek feltöltésre (további mezőket hozzáadhat a levelezőlistához, ha szükséges);
- 4.2) Kattintson az e-mail törzs mezőre, majd nyomja meg a gombot Ctrl + V gombokkal illessze be a kijelölt tartományadatokat. Ezt követően adjon hozzá más tartalmat, amire szüksége van;
- 4.3 Törölje a jelet Küldjön e-maileket az Outlook segítségével doboz;
- 2.4) Kattintson a gombra Kimenő szerver beállításai gomb. Lásd a képernyőképet:
5. Ezután a Kimenő szerver (SMTP) beállításai - Új séma megjelenik a párbeszédpanel. Kérjük, töltse ki az e-mail címet a szerver beállításokkal, és a mappa ellenőrzése után adjon meg egy mappát az összes elküldött levél elmentéséhez Mentse az elküldött e-maileket ide: jelölőnégyzetet, majd kattintson a gombra OK gombot a beállítások mentéséhez.
6. Amikor visszatér a Emaileket küld párbeszédpanelen kattintson a Küldés gombra az e-mail elküldéséhez.
Mostantól ezzel a szolgáltatással e-maileket küldhet közvetlenül az Excel programban.
Ha ingyenes (30 napos) próbaverziót szeretne kapni a segédprogramról, kattintson a letöltéshez, majd lépjen a művelet végrehajtására a fenti lépések szerint.
Kapcsolódó cikkek:
E-mail küldése az Excel celláiban megadott e-mail címekre
Tegyük fel, hogy van egy e-mail címlista, és e-mail címre szeretne tömegesen küldeni e-mail címeket közvetlenül az Excel programban. Hogyan lehet elérni? Ez a cikk bemutatja az e-mail küldésének módszereit az Excel celláiban megadott több e-mail címre.
Helyezze be az Outlook aláírását, amikor e-mailt küld Excelbe
Feltéve, hogy közvetlenül az Excelben szeretne e-mailt küldeni, hogyan adhatja hozzá az alapértelmezett Outlook aláírást e-mailjeihez? Ez a cikk két módszert ismertet az Outlook aláírás hozzáadásához, amikor e-mailt küld az Excel programba.
E-mail küldése az Excelhez csatolt több melléklettel
Ez a cikk arról szól, hogy e-mailt küldjön az Outlook alkalmazáson keresztül az Excelhez csatolt több melléklettel.
E-mail küldése, ha az esedékesség dátuma lejárt az Excelben
Például, ha a C oszlopban szereplő esedékesség legfeljebb 7 nap (a jelenlegi dátum 2017/9/13), akkor küldjön e-mailes emlékeztetőt az A oszlopban megadott címzettnek a B. oszlopban megadott tartalommal. elérni? Ez a cikk egy VBA-módszert ismertet a részletek kezelésére.
Automatikus e-mail küldése az Excel cellasejtjei alapján
Tegyük fel, hogy e-mailt szeretne küldeni az Outlook segítségével egy bizonyos címzettnek az Excel megadott cellája alapján. Például, ha a munkalap D7 cellájának értéke nagyobb, mint 200, akkor automatikusan létrejön egy e-mail. Ez a cikk egy VBA-módszert mutat be a probléma gyors megoldására.
A legjobb irodai termelékenységi eszközök
A Kutools for Excel megoldja a legtöbb problémát, és 80% -kal növeli a termelékenységet
- újrafelhasználás: Gyorsan helyezze be összetett képletek, diagramok és bármi, amit korábban használt; Cellák titkosítása jelszóval; Levelezőlista létrehozása és e-maileket küldeni ...
- Szuper Formula Bár (könnyedén szerkeszthet több szöveget és képletet); Olvasás elrendezés (könnyen olvasható és szerkeszthető nagyszámú cella); Beillesztés a Szűrt tartományba...
- Cellák / sorok / oszlopok egyesítése az adatok elvesztése nélkül; Osztott cellák tartalma; Kombinálja a duplikált sorokat / oszlopokat... megakadályozza az ismétlődő cellákat; Hasonlítsa össze a tartományokat...
- Válassza a Másolat vagy az Egyedi lehetőséget Sorok; Válassza az Üres sorok lehetőséget (az összes cella üres); Super Find és Fuzzy Find sok munkafüzetben; Véletlenszerű kiválasztás ...
- Pontos másolás Több cella a képletreferencia megváltoztatása nélkül; Automatikus referenciák létrehozása több lapra; Helyezze be a golyókat, Jelölőnégyzetek és még sok más ...
- Kivonat szöveg, Szöveg hozzáadása, Eltávolítás pozíció szerint, Hely eltávolítása; Hozz létre és nyomtasson személyhívó részösszegeket; Konvertálás a cellatartalom és a megjegyzések között...
- Szuper szűrő (mentse el és alkalmazza a szűrősémákat más lapokra); Haladó rendezés hónap / hét / nap, gyakoriság és egyebek szerint; Speciális szűrő félkövér, dőlt betűvel ...
- Kombinálja a munkafüzeteket és a munkalapokat; Táblázatok egyesítése kulcsoszlopok alapján; Az adatok felosztása több lapra; Kötegelt konvertálás xls, xlsx és PDF...
- Több mint 300 hatékony funkció. Támogatja az Office / Excel 2007-2019 és 365. Támogatja az összes nyelvet. Könnyen telepíthető a vállalkozásba vagy szervezetbe. 30 napos ingyenes próbaverzió. 60 napos pénzvisszafizetési garancia.

Az Office fül a füles felületet hozza az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és minden nap több száz kattintással csökkenti az egér kattintását!
