Я не могу использовать Unicode символы почтовой перспективы с VBA Excel - PullRequest
1 голос
/ 11 июня 2019

Я использую код ниже.

(Кстати, мне пришлось удалить какой-то код из-за безопасности, но главная проблема - понимание, я думаю ... если у вас есть вопрос, пожалуйста, спросите)

Проблема в том, что я хочу написать "Değerli Adayımız", в перспективе это выглядит как "DeÞerli Adayýmýz"

Я пробовал кое-что, но ничего не вышло.

Мне нужна твоя помощь ...

Большое спасибо.

Sub mailgonder()


        Application.EnableEvents = False
        Application.ScreenUpdating = False

        Set OutApp = CreateObject("Outlook.Application")
        Set OutMail = OutApp.CreateItem(olMailItem)
        Set fso = CreateObject("Scripting.FilesystemObject")
        Set Signature = fso.OpenTextFile("C:\Users\*.htm", 1)


        With OutMail
        .SentOnBehalfOfName = "*.COM"
        .To = Cells(ki, 5)
        .CC = "*.com"
        .BCC = ""
        .Subject = "Deneme"
        .HTMLBody = "Değerli Adayımız" & Cells(ki, 2) & Signature.readall
        .Display
        '.Send
        End With
           On Error GoTo 0
         Set OutMail = Nothing: Set OutApp = Nothing:
        Application.EnableEvents = True
        Application.ScreenUpdating = True


End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...