Excelで指定された太字/サイズ/色/下線のテキスト形式で電子メールを送信するにはどうすればよいですか？

HTML本文形式は、電子メールを充実させ、読みやすくすることができます。 この記事では、太字、下線、および指定されたサイズと色のテキスト形式を追加して、ExcelでHTML形式の電子メール本文を使用して電子メールを送信する方法について説明します。

VBAコードを使用して、指定された太字/サイズ/色/下線のテキスト形式でメールを送信します

VBAコードを使用して、指定された太字/サイズ/色/下線のテキスト形式でメールを送信します

以下のVBAコードを適用して、Excelで特定のHTML本文形式の電子メールを送信してください。

1。 プレス 他の + F11 キーを同時に開いて アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール。 次に、以下の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形式の本文を含むメールが開きます。 をクリックしてください 送信 それを送信するボタン。

関連記事：

• Excelのセル値に基づいて電子メールを自動的に送信するにはどうすればよいですか?
• Excelでvbaで送信するときにOutlookの電子メールに署名を挿入するにはどうすればよいですか？
• ExcelでOutlookなしでメールを送信するにはどうすればよいですか？
• Excelでvbaを使用して特定のグラフを電子メールで送信するにはどうすればよいですか？
• ExcelでXNUMX日の特定の時間にメールを送信するにはどうすればよいですか？
• ExcelでHTMLメール本文を使用してメールを送信するにはどうすればよいですか？