Проблема шрифта Outlook в VBA

---

Привет
У нас есть ниже код для запуска электронной почты Outlook:

t OL = CreateObject("Outlook.Application")
Set EmailItem = OL.CreateItem(olmailitem)
                
With EmailItem
    .To = sMyOpsStaffNO
    '.cc = sMyCaseworkerid
                
    .Subject = "RESTRICTED CLIENT"
                
    .body = "Thank you for your Referral Request logged as:= " & sMyCCESMno & Chr(10) _
    & "Case Reference Number:= " & sMyCaseNumber & Chr(10) _
    & "Employer ERN:= " & sMyERN & Chr(10) _
    & "Employer Name:= " & sMyERNName & Chr(10) & Chr(10) _
    & "I have identified that the referral submitted contained an error therefore we are rejecting the referral sent to us for the following reason(s):-" & Chr(10) & Chr(10) _
    & "###########################################################################################################" & Chr(10) _
    & sResp & Chr(10) _
    & "###########################################################################################################" & Chr(10) & Chr(10) _
    & "Many Thanks" & Chr(10) & Chr(10) & Chr(10) & Chr(10) _
    & uName & Chr(10) _
    & "Payment and Services Customer Service Team" & Chr(10) _
    & "E_M_A_I_L_B_L_O_C_K"

    '''.Display
    '''.Save
    EmailItem.DeleteAfterSubmit = True
    EmailItem.send
    
End With

Это письмо запускается с размером шрифта 1638. Мы проверили настройки outlook, и размер шрифта установлен на 12.

Не знаю, почему это меняется с электронной почтой, вызванной вышеприведенным кодом.

Пожалуйста, посоветуйте.

спасибо
Параг

Что я уже пробовал:

Мы проверили настройку размера шрифта Outlook.

---