向前扩展所选内容，直至遇到另一种字体或字号。
expression.SelectCurrentFont
expression 必需。该表达式返回一个 Selection 对象。
本示例将所选内容向前扩展，直至遇到另一种字体或字号。本示例使用 Grow 方法将所选文字的字号设为下一个可用的字号。
With Selection .SelectCurrentFont .Font.Grow End With