VBA编辑器中的土耳其字符

VBA编辑器中的土耳其字符,vba,Vba,我的简单VBA代码中的土耳其语字符有问题。每当我在模块中用土耳其语字符(例如“ş,ə,ç,ğ,ö,ü,ı”)书写一些文本时,它们就会变成未知字母 我想将“八”改为“Səkkiz”、“五”、“Beş”、“三”、“Üç”等。可能您应该在文本编辑器中更改字体 尝试:第二个选项卡上的工具>选项选择字体Courier New(Turkish)可能您应该在文本编辑器中更改字体 尝试:第二个选项卡上的工具>选项选择字体Courier New(Turkish)VB编辑器不支持Unicode。假设无论在何处显示这

我的简单VBA代码中的土耳其语字符有问题。每当我在模块中用土耳其语字符(例如“ş,ə,ç,ğ,ö,ü,ı”)书写一些文本时,它们就会变成未知字母


我想将“八”改为“Səkkiz”、“五”、“Beş”、“三”、“Üç”等。

可能您应该在文本编辑器中更改字体
尝试:第二个选项卡上的工具>选项选择字体Courier New(Turkish)

可能您应该在文本编辑器中更改字体
尝试:第二个选项卡上的工具>选项选择字体Courier New(Turkish)

VB编辑器不支持Unicode。假设无论在何处显示这些字符,都可以执行以下操作:

Const UpsideDownE As Long = &H1DD

Sub Example()
' This would set the currently selected text in PowerPoint to ə
ActiveWindow.Selection.ShapeRange.TextFrame.TextRange = ChrW(UpsideDownE)

End Sub

当然,为对您有意义的常量选择名称…无论您通常如何称呼ə字符。

VB编辑器不支持Unicode。假设您在任何地方显示这些字符,您都可以执行以下操作:

Const UpsideDownE As Long = &H1DD

Sub Example()
' This would set the currently selected text in PowerPoint to ə
ActiveWindow.Selection.ShapeRange.TextFrame.TextRange = ChrW(UpsideDownE)

End Sub

当然,为对您有意义的常量选择名称……无论您通常如何称呼ə字符。

“当我在模块中用土耳其语编写一些文本时,这些字符会变成未知字母。我想把“8”改为“Səkkiz”,“5”,“Beş”,“3”,“Üç”等,显示您的代码纳什:当我在模块中用土耳其语“ş,ə,ç,ğ,ö,ü,ı”字符写一些文字时,这些字符变为未知字母。我想把“八”改为“Səkkiz”,“五”“Beş”,“三”“Üçç”等,显示代码