怎样在word文字竖排时让数字也竖立？

可以在格式里面更改大小写，改成全角就可以了,非常方便.同样适用于各种符号,字母。

半角和全角的区别
一、在计算机屏幕上，一个汉字要占两个英文字符的位置，人们把一个英文字符所占的位置称为"半角"，相对地把一个汉字所占的位置称为"全角"。在汉字输入时，系统提供"半角"和"全角"两种不同的输入状态，但是对于英文字母、符号和数字这些通用字符就不同于汉字，在半角状态它们被作为英文字符处理；而在全角状态，它们又可作为中文字符处理。半角和全角切换方法：单击输入法工具条上的按钮或按键盘上的Shift+Space键来切换。

二、 全角与半角各在什么情况下使用？
全角占两个字节，半角占一个字节。
半角全角主要是针对标点符号来说的，全角标点占两个字节，半角占一个字节，而不管是半角还是全角，汉字都还是要占两个字节。
在编程序的源代码中只能使用半角标点（不包括字符串内部的数据）
在不支持汉字等语言的计算机上只能使用半角标点（其实这种情况根本就不存在半角全角的概念）
对于大多数字体来说，全角看起来比半角大，当然这不是本质区别了。
三、 全角和半角的区别
全角就是字母和数字等与汉字占等宽位置的字。半角就是ASCII方式的字符，在没有汉字输入法起做用的时候输入的字母数字和字符都是半角的。
在汉字输入法出现的时候，输入的字母数字默认为半角，但是标点则是默认为全角，可以通过鼠标点击输入法工具条上的相应按钮来改变。

除了使用全角字符外，还可以使用中文版式中的纵横混排。以下代码也可将坚排文字的所有数字“站起来”：
Sub test()
Dim myRange As Range, myRange1 As Range
Set myRange = ActiveDocument.Content
With myRange.Find
.ClearFormatting
.MatchByte = True
End With
Do Whi