テキスト範囲内の文字の Bold プロパティの状態を表す MsoTriState 定数を返すか、設定します。 値の取得と設定が可能です。
構文
式。太字
式Font オブジェクトを表す変数。
戻り値
MsoTriState
注釈
Bold プロパティの値には、Microsoft Office のタイプ ライブラリで宣言されている以下の msotristate クラス の定数のいずれかを指定できます。
| 定数 | 説明 |
|---|---|
| msoFalse | 範囲内に太字が設定されている文字はありません。 |
| msoTriStateMixed | 範囲に太字で書式設定されたテキストと太字に書式設定されていないテキストが含まれていることを示す戻り値。 |
| msoTriStateToggle | msoTrue と msoFalse を切り替える設定値。 |
| msoTrue | 範囲内のすべての文字に太字が設定されています。 |
例
この例では、アクティブなパブリケーションの 2 番目のストーリーにあるすべてのテキストをテストし、太字のテキストと太字のテキストが含まれていない場合は、すべてのテキストを太字に設定します。 テキストがすべて太字またはすべて太字でない場合、太字が混在していないことをユーザーに通知するメッセージが表示されます。 この使用例が動作するには、作業中の文書内にテキストを持つ 2 つ以上のストーリーが必要です。
Sub BoldStory()
Dim stf As Publisher.Font
Set stf = Application.ActiveDocument.Stories(2).TextRange.Font
With stf
If .Bold = msoTriStateMixed Then
.Bold = msoTrue
Else
MsgBox "Mixed bolding is not in this story."
End If
End With
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。