VBA,帮我解释代码
With Selection.Font.NameFarEast = "宋体"
.NameAscii = "Times New Roman"
.NameOther = "Times New Roman"
.Name = "Times New Roman"
.Size = 12
.Bold = False
.Italic = False
.Underline = wdUnderlineNone
.UnderlineColor = wdColorAutomatic
.StrikeThrough = False
.DoubleStrikeThrough = False
.Outline = False
.Emboss = False
.Shadow = False
.Hidden = False
.SmallCaps = False
.AllCaps = False
.Color = wdColorAutomatic
.Engrave = False
.Superscript = False
.Subscript = False
.Spacing = 0
.Scaling = 100
.Position = 0
.Kerning = 1
.Animation = wdAnimationNone
.DisableCharacterSpaceGrid = False
.EmphasisMark = wdEmphasisMarkNone
End With
补充:
wdStyleNormal=-1,试试With ActiveDocument.Styles(-1).Font
烦高手帮我每句后面加上解释,我没有学过VBA,不尽感谢! --------------------编程问答-------------------- 打开帮助输入Font对象。 --------------------编程问答-------------------- 和VBA没有关系,
对应了字体的一些属性,你在这张图上找找。
![](/upload/2013122122/04fig02.gif)
不懂的翻看字典,或者用你中文版的Word对照。
补充:VB , VBA