constant that represents the font script for a text range. Read-only.
PbFontScriptType can be one of these PbFontScriptType constants. |
pbFontScriptArabic |
pbFontScriptArmenian |
pbFontScriptAsciiLatin |
pbFontScriptAsciiSym |
pbFontScriptBengali |
pbFontScriptBopomofo |
pbFontScriptBraille |
pbFontScriptCanadianAbor |
pbFontScriptCherokee |
pbFontScriptCurrency |
pbFontScriptCyrillic |
pbFontScriptDefault |
pbFontScriptDevanagari |
pbFontScriptEthiopic |
pbFontScriptEUDC |
pbFontScriptGeorgian |
pbFontScriptGreek |
pbFontScriptGujarati |
pbFontScriptGurmukhi |
pbFontScriptHalfWidthKana |
pbFontScriptHan |
pbFontScriptHangul |
pbFontScriptHanSurrogate |
pbFontScriptHebrew |
pbFontScriptKana |
pbFontScriptKannada |
pbFontScriptKhmer |
pbFontScriptLao |
pbFontScriptLatin |
pbFontScriptMalayalam |
pbFontScriptMixed |
pbFontScriptMongolian |
pbFontScriptMyanmar |
pbFontScriptNonHanSurrogate |
pbFontScriptOgham |
pbFontScriptOriya |
pbFontScriptRunic |
pbFontScriptSinhala |
pbFontScriptSyriac |
pbFontScriptTamil |
pbFontScriptTelugu |
pbFontScriptThaana |
pbFontScriptThai |
pbFontScriptTibetan |
pbFontScriptYi |
expression.Script
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example displays a message if the font script used in the specified text range is ASCII Latin. This example assumes that there is at least one shape on the first page of the active publication.
Sub DisplayScriptType()
If ActiveDocument.Pages(1).Shapes(1).TextFrame.TextRange _
.Script = pbFontScriptAsciiLatin Then
MsgBox "The font script you are using is ASCII Latin."
End If
End Sub