Hogyan küldhetünk e-mailt, ha az Excel gombra kattintunk?
Tegyük fel, hogy e-mailt kell küldeni az Outlook segítségével az Excel munkalapon található gombra kattintva. Ez a cikk részletesen bemutatja a VBA módszert.
E-mail küldése, ha a gombra kattintanak VBA kóddal
E-mail küldése, ha a gombra kattintanak VBA kóddal
Kérjük, tegye a következőket, ha e-mailt szeretne küldeni az Outlookon keresztül, ha az Excel munkafüzetben egy Parancs gombra kattint.
1. Kattintson a parancsikonra a munkalapra kattintva Fejlesztő > betétlap > Parancs gomb (ActiveX vezérlő). Lásd a képernyőképet:
2. Kattintson a jobb gombbal a beillesztett Parancs gombra, majd kattintson a gombra Kód megtekintése a jobb egérgombbal a menüből, ahogy az alábbi képernyőkép mutatja.
3. A nyílásban Microsoft Visual Basic for Applications ablakban, kérjük, cserélje ki a Kód ablak eredeti kódját a következő VBA szkriptre.
VBA kód: E-mail küldése, ha az Excel gombra kattintunk
Private Sub CommandButton1_Click()
'Updated by Extendoffice 2017/9/14
Dim xOutApp As Object
Dim xOutMail As Object
Dim xMailBody As String
On Error Resume Next
Set xOutApp = CreateObject("Outlook.Application")
Set xOutMail = xOutApp.CreateItem(0)
xMailBody = "Body content" & vbNewLine & vbNewLine & _
"This is line 1" & vbNewLine & _
"This is line 2"
On Error Resume Next
With xOutMail
.To = "Email Address"
.CC = ""
.BCC = ""
.Subject = "Test email send by button clicking"
.Body = xMailBody
.Display 'or use .Send
End With
On Error GoTo 0
Set xOutMail = Nothing
Set xOutApp = Nothing
End Sub
Megjegyzések:
1). Kérjük, módosítsa az e-mail törzsét, amire szüksége van a xMailBody sor a kódban.
2). Helyettesíteni a E-mail címe a címzett e-mail címével a sorban .To = "E-mail cím".
3). Adja meg a Másolat és Titkos másolat címzetteket, amire szüksége van .CC = "" és a .Bcc = "" szakaszok.
4). Változtassa meg az e-mail tárgyát sorban .Subject = "Az e-mail küldésének tesztelése gomb kattintással".
4. megnyomni a más + Q gombok egyszerre a Microsoft Visual Basic for Applications ablak.
5. Kattintson a gombra a Design Mode kikapcsolásával Fejlesztő > Tervezési mód. Lásd a képernyőképet:
Mostantól kezdve minden alkalommal, amikor a Parancs gombra kattint, automatikusan létrejön egy e-mail a megadott címzettekkel, tárggyal és törzzsel. Kérjük, küldje el az e-mailt a gombra kattintva Küldés gombot.
Megjegyzések: A VBA kód csak akkor működik, ha az Outlook programot használja e-mail programként.
Könnyen küldhet e-mailt az Outlook segítségével az Excelben a létrehozott levelezőlista mezők alapján:
A Emaileket küld hasznossága Kutools az Excel számára segít az e-mail küldésében az Outlook segítségével az Excelben létrehozott levelezőlista mezői alapján.
Töltse le és próbálja ki most! (30 napos ingyenes túra)
Kapcsolódó cikkek:
- Hogyan küldhetünk automatikusan e-mailt az Excel cellája alapján?
- Hogyan küldhetünk e-mailt az Outlookon keresztül, amikor a munkafüzet mentésre kerül az Excelbe?
- Hogyan lehet e-mailt küldeni, ha egy bizonyos cellát módosítanak az Excelben?
- Hogyan lehet e-mailt küldeni, ha az Excel határidejét betartotta?
- Hogyan küldhetünk e-mailes emlékeztetőt vagy értesítést, ha a munkafüzet frissül az Excel programban?
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz 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 naponta több száz kattintással csökkenti az egér kattintását!