Word VBA教程:InsertSymbol方法

插入一个符号,用其替换指定区域或选定内容。

注意   如果不需要替换区域或选定内容,可在使用本方法之前,使用 Collapse方法。

expression.InsertSymbol(CharacterNumber, Font, Unicode, Bias)

expression   必需。该表达式返回一个 Range 或 Selection对象。

CharacterNumber   Long 类型,必需。指定符号的字符编码。该值应是 31 加上符号在符号表中相应的位置数(从左向右计算)。例如,要指定一个 delta 字符,该字符位于“Symbol”字体符号表中的第 37 号位置,则 CharacterNumber 应设置为 68。

Font   Variant 类型,可选。指定包含符号的字体名称。

Unicode   Variant 类型,可选。如果本参数为 True,则插入由 CharacterNumber 指定的 Unicode 字符;如果本参数为 False,则插入由 CharacterNumber 指定的 ANSI 字符。默认值为 False。

Bias   Variant 类型,可选。用来为符号设置字体斜线。此参数可用于为字符设置正确的字体斜线以符合东亚人的使用特点。可以是下列 WdFontBias 常量之一:wdFontBiasDefault、wdFontBiasDontCare 或 wdFontBiasFareast。根据您选择安装的语言支持(例如美国英语)不同,该参数可能无法使用。

VBA示例

本示例在插入点插入一个双向箭头。


With Selection
    .Collapse Direction:=wdCollapseStart
    .InsertSymbol CharacterNumber:=171, _
        Font:="Symbol", Unicode:=False
End With

本示例在选定内容的第一个段落起始处插入一个项目符号和一个制表位。


Set myRange = Selection.Paragraphs(1).Range
With myRange
    .Collapse Direction:=wdCollapseStart
    .InsertSymbol CharacterNumber:=183, _
        Font:="Symbol", Unicode:=False
    .MoveStart Unit:=wdCharacter, Count:=1
    .InsertAfter vbTab
End With

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号