Outlookでマクロを作成するようにユーザーからリクエストを受け取りました。Outlook VBAを使用して電子メールのカーソルの配置とテキスト形式を指定する方法
彼の要件は、太字、ハイライト、イタリックの電子メールヘッダーを持つことでした。
この部分は達成できましたが、ヘッダーのすぐ下の電子メールの本文にカーソルがあり、通常の書式設定オプション(フォント、サイズ、色)を使用してテキストを入力できるようになりました。
現在、マクロが実行されると、カーソルは電子メールヘッダーの先頭で終了します。
カーソルをヘッダーの下の行に移動すると、テキストは太字でイタリック体になります。
ヘッダーが挿入された後にテキスト書式をリセットする方法はありますか?カーソルがヘッダーの下にくるように指定する方法はありますか?これは、我々がこれまでに出ているものです:
Sub Testmacro2()
Dim olApp As Outlook.Application, olEmail As Outlook.MailItem, signature As String
Set olApp = CreateObject("Outlook.Application")
Set olEmail = olApp.CreateItem(0)
With olEmail
.Display
End With
signature = olEmail.HTMLBody
With olEmail
.HTMLBody = "<HTML><BODY><span style='background:yellow;mso-highlight:yellow'><em><b><p style=font-size:14pt>Privileged & Confidential Attorney Client Communication & Work Product.</b></em><br></span></BODY></HTML>" & vbNewLine & signature
End With
Set olEmail = Nothing
Set olApp = Nothing
End Sub
ありがとうございます。私はこれを試してみましょう。 – dutsey