كيفية إرسال بريد إلكتروني بتنسيق نص غامق / حجم / لون / تسطير محدد في Excel؟

يمكن أن يثري تنسيق نص HTML البريد الإلكتروني ويسهل قراءته. تتحدث هذه المقالة عن إرسال بريد إلكتروني بهيئة بريد إلكتروني بتنسيق HTML في Excel عن طريق إضافة تنسيق غامق وتسطير بالإضافة إلى الحجم المحدد وتنسيق النص الملون.

أرسل بريدًا إلكترونيًا بتنسيق نص غامق / حجم / لون / تسطير محدد مع رمز VBA

أرسل بريدًا إلكترونيًا بتنسيق نص غامق / حجم / لون / تسطير محدد مع رمز VBA

يرجى تطبيق رمز VBA أدناه لإرسال بريد إلكتروني بتنسيق نص HTML محدد في Excel.

1. اضغط على قديم + F11 مفاتيح في نفس الوقت لفتح ميكروسوفت فيسوال باسيك للتطبيقات نافذة.

2. في ال ميكروسوفت فيسوال باسيك للتطبيقات الإطار، انقر فوق إدراج > وحدة. ثم انسخ رمز VBA أدناه في نافذة التعليمات البرمجية.

كود VBA: أرسل بريدًا إلكترونيًا بتنسيق نص غامق / حجم / لون / تسطير محدد في Excel

Sub SharePerformance1()
'Update by ExtendOffice 2018/3//5
    Dim xOutApp As Object
    Dim xOutMail As Object
    Dim xOutMsg As String
    On Error Resume Next
    Set xOutApp = CreateObject("Outlook.Application")
    Set xOutMail = xOutApp.CreateItem(0)
    xOutMsg = "<b>This text is bold</b><br/><span style=""color:#80BFFF"">Font Color</span style=""color:#80BFFF""><br />" & _
               "<u>New line with underline</u><br /><p style='font-family:calibri;font-size:25'>Font size</p>"
    With xOutMail
        .To = "Email Address"
        .CC = ""
        .BCC = ""
        .Subject = "Html format email"
        .HTMLBody = xOutMsg
        .Display
    End With
    Set xOutMail = Nothing
    Set xOutApp = Nothing
End Sub

ملاحظة:

3. اضغط على F5 مفتاح لتشغيل الكود. ثم يتم فتح البريد الإلكتروني بنص تنسيق HTML المحدد. الرجاء الضغط على أرسل زر لإرساله.

مقالات ذات صلة:

• كيفية إرسال البريد الإلكتروني تلقائيا على أساس قيمة الخلية في إكسيل؟
• كيفية إدراج التوقيع في بريد Outlook الإلكتروني عند الإرسال عن طريق vba في Excel؟
• كيفية إرسال بريد إلكتروني بدون Outlook في Excel؟
• كيف ترسل مخططًا معينًا في رسالة بريد إلكتروني باستخدام vba في Excel؟
• كيفية إرسال بريد إلكتروني في وقت محدد من اليوم في Excel؟
• كيفية إرسال بريد إلكتروني بهيئة بريد إلكتروني بتنسيق HTML في Excel؟