TextFrame.Characters.Font.Name不改变excel形状的中文字体的字体

Question

标题几乎告诉了一切。

我的代码就像下面：

sh.TextFrame.Characters.Font.Name = "SimSun" 

此代码仅更改所有英语和单字节符号字体。

所有双字节符号和中文字符保留默认字体。

我也尝试了TextFrame2以及相同的结果。

我在Excel 2007上。

任何人都可以帮忙吗？谢谢。

Answer 1

我在日语中发现了Microsoft帮助台文章，解释了该问题。

Excel将1字节的英文字符和2字节的中文/日文字符的字体名称划分为vba中的不同模块。

解决方法如下。

sh.TextFrame2.TextRange.Font.NameFarEast = "SimSun" 
sh.TextFrame2.TextRange.Characters.Font.Name = "SimSun" 

第一行更改形状文本框中所有2字节字符的字体，第二行更改所有单字节字母的字体。

远东...哇