Hogyan küldhetünk e-mailt az Excelből hiperhivatkozással az e-mail törzsében?
Próbáltál már VBA-kóddal e-mailt küldeni Excelben? És hogyan lehet hiperhivatkozásokat hozzáadni az e-mail törzsszövegéhez e-mail küldésekor? Ez a cikk segít megoldani ezt a problémát.
Helyezze be a hiperhivatkozást a VBA kóddal ellátott e-mail törzsébe
Helyezze be a hiperhivatkozást a VBA kóddal ellátott e-mail törzsébe
Az alábbi VBA-kód segíthet e-mailek küldésében az Excelből, és speciális hiperhivatkozásokat illeszthet be az e-mail törzsébe. Kérjük, tegye a következőket.
1. Indítsa el a munkafüzetet, nyomja meg a gombot más + F11 billentyűk megnyitásához Microsoft Visual Basic for Applications ablak.
2. Ban,-ben Microsoft Visual Basic for Applications ablakban kattintson betétlap > Modul, majd másolja az alábbi VBA kódot a Module szerkesztőbe.
VBA kód: Helyezze be a hiperhivatkozást az e-mail törzsébe
Sub EmailHyperlink()
'updated by Extendoffice 20190815
Dim xOtl As Object
Dim xOtlMail As Object
Dim xStrBody As String
xStrBody = "Hi there:" & "<br>" _
& "Please click " & "<a href=" & "http://www.extendoffice.com"">Here</a> to open the page" & "<br>" _
& "Thank you."
On Error Resume Next
Set xOtl = CreateObject("Outlook.Application")
Set xOtlMail = xOtl.CreateItem(olMailItem)
With xOtlMail
.To = "Email Address"
.CC = "Email Address "
.BCC = " Email Address "
.Subject = "Subject line"
.HTMLBody = .HTMLBody & xStrBody
.Display
End With
Set xOtl = Nothing
Set xOtlMail = Nothing
End Sub
Megjegyzések:
- Kérjük, módosítsa a törzs tartalmát és a hiperhivatkozást a xStrBody vonal.
- Helyettesíteni a "E-mail címe"A .Nak nek, .DC és.BCC sorok azoknak a tényleges e-mail címeknek, amelyekre e-mailt küldeni fog. Ha nincs szüksége a CC és BCC sorokra, egyszerűen távolítsa el őket a teljes kódból, vagy adjon hozzá egy idézetet a sorok elé, például 'CC = "E-mail cím".
- Helyettesíteni a "Tárgy sor"A .Tantárgy összhangban a saját e-mail tárgyával.
3. megnyomni a F5 gombot a kód futtatásához. Ezután létrehozza az e-mailt a megadott mezőkkel és törzszel, benne hiperhivatkozással, kattintson a Küldés gombra az elküldéséhez.
Kapcsolódó cikkek
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.
E-mail küldése, ha az gombra kattint az Excel programban
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 az esedékesség dátuma lejárt az Excelben
Ha feltételezzük, hogy a C oszlopban az 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 meghatározott tartalommal. Hogyan érhető el? A cikkben szereplő módszer jót tehet Önnek.
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!