Font.SubScript プロパティ (Publisher)

  • [アーティクル]

指定したテキスト範囲で文字を添字として書式設定するかどうかを示す MsoTriState 定数を設定または返します。 値の取得と設定が可能です。

構文

式。添 字

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

戻り値

MsoTriState

注釈

インデックス プロパティの値には、Microsoft Office のタイプ ライブラリで宣言されているし、次の表に示す msotristate クラス の定数のいずれかを指定できます。

定数 説明
msoFalse 範囲内に下付きが設定されている文字はありません。
msoTriStateMixed 指定した図形範囲の msoTrue と msoFalse の組み合わせを示す戻り値。
msoTriStateToggle msoTrue と msoFalse を切り替える設定値。
msoTrue 範囲内のすべての文字に下付きが設定されています。

Msotrue を設定 する インデックス プロパティを設定したテキスト範囲に上付きの書式を削除します。

例

次の使用例は、2 番目のストーリーのテキストをテストし、添字が混在している場合は、すべてのテキストを添字として書式設定します。

Sub SubScript() 
 
 Dim fntSS As Font 
 
 Set fntSS = Application.ActiveDocument.Stories(2).TextRange.Font 
 With fntSS 
 If .SubScript = msoTriStateMixed Then 
 .SubScript = msoTrue 
 Else 
 MsgBox "Mixed subscript not in this story." 
 End If 
 End With 
 
End Sub

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

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