你们理解错了，是这样的，word中换字体不是有一号，二号。。。字体吗，而我的word上显示的是8，10，22.。。这样的字体，我想问可以将字体的设置由阿拉伯数字改为汉字类型的吗？？他显示的是阿拉伯数字，不好弄呢？？
直接选择字体-点击工具栏的字体-宋体或其他中文字体即可：
温馨提示：答案为网友推荐，仅供参考
第1个回答 2011-06-17
增大字号用[Ctrl]+[>]，减小用[Ctrl]+[>]，一般两个汉字字号之间都有一个阿拉伯数字字号，自己试试就知道。
第2个回答 2011-06-16
1、Alt+F11打开VBA编辑窗口，然后选择菜单项“插入-模块”；
2、在编辑区中粘贴如下代码：
Sub ConvertAllNumbers()
Selection.Find.ClearFormatting
While Selection.Find.Execute(FindText:="^#", ReplaceWith:="^&", MatchWildcards:=False, Forward:=True, Wrap:=Word.wdFindContinue)
Selection.MoveRight wdWord, 1, wdExtend
Selection.Fields.Add Range:=Selection.Range, Text:="=" & Selection.Text & " \* CHINESENUM3"
Selection.MoveLeft wdWord, 1, wdExtend
Selection.Text = Selection.Fields(1).Result
Selection.Collapse wdCollapseEnd
Wend
MsgBox "完成！"
End Sub
3、键入F5，运行看到“完成！”。
4、切换回Word文档窗口检查是否所有数字都已转换为中文数字。本回答被提问者采纳
2、在编辑区中粘贴如下代码：
Sub ConvertAllNumbers()
Selection.Find.ClearFormatting
While Selection.Find.Execute(FindText:="^#", ReplaceWith:="^&", MatchWildcards:=False, Forward:=True, Wrap:=Word.wdFindContinue)
Selection.MoveRight wdWord, 1, wdExtend
Selection.Fields.Add Range:=Selection.Range, Text:="=" & Selection.Text & " \* CHINESENUM3"
Selection.MoveLeft wdWord, 1, wdExtend
Selection.Text = Selection.Fields(1).Result
Selection.Collapse wdCollapseEnd
Wend
MsgBox "完成！"
End Sub
3、键入F5，运行看到“完成！”。
4、切换回Word文档窗口检查是否所有数字都已转换为中文数字。本回答被提问者采纳
第3个回答 2011-06-16
你说的是这个吗？在段落里找。由于我的是07版本，就体现在开始菜单栏里，03版的就不知道在哪了。。。
第4个回答 2011-06-17
用TEXT.如:
A1输入数字(日期),A2显示汉字.
A2 =TEXT($A1,"[DBNUM1]D号")
如A2显示汉字为"月"将公式中的"号"改为"月"即可.
如A2不想显示量词汉字:
A2 =TEXT($A1,"[DBNUM1]0")
够详细了吧!
A1输入数字(日期),A2显示汉字.
A2 =TEXT($A1,"[DBNUM1]D号")
如A2显示汉字为"月"将公式中的"号"改为"月"即可.
如A2不想显示量词汉字:
A2 =TEXT($A1,"[DBNUM1]0")
够详细了吧!
