次の方法で共有

TextRange.Script プロパティ (Publisher)

  • [アーティクル]

テキスト範囲のフォント スクリプトを表す PbFontScriptType 定数を返します。 読み取り専用です。

構文

式。スクリプト

式TextRange オブジェクトを表す変数。

戻り値

PbFontScriptType

注釈

Script プロパティの値には、Microsoft Publisher タイプ ライブラリで宣言されている PbFontScriptType クラスの定数のいずれかを指定できます。

例

次の使用例は、指定したテキスト範囲のフォント スクリプトが ASCII Latin の場合にメッセージを表示します。 この使用例では、作業中の文書の最初のページに図形が少なくとも 1 つ存在することを前提としています。

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

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。