2012-02-16 55 views

回答

0

我相信是的。這些是您可以與之交互的不同參數。

Sub Sample() 
    With Selection.Font 
     .Name = "+Body" 
     .Size = 11 
     .Bold = False 
     .Italic = False 
     .Underline = 0 ' wdUnderlineNone 
     .UnderlineColor = -16777216 'wdColorAutomatic 
     .StrikeThrough = False 
     .DoubleStrikeThrough = False 
     .Outline = False 
     .Emboss = False 
     .Shadow = False 
     .Hidden = False 
     .SmallCaps = False 
     .AllCaps = False 
     .Color = -16777216 
     .Engrave = False 
     .Superscript = False 
     .Subscript = False 
     .Spacing = -1.1 
     .Scaling = 150 
     .Position = 4 
     .Kerning = 0 
     .Animation = 0 'wdAnimationNone 
    End With 
End Sub 
+0

@dragonfly:如果您的查詢已解決,請隨時關閉此問題:) – 2012-02-19 18:07:10

相關問題