フォントがすべて大文字として書式設定されている場合は msoTrue を返すか設定します。そうでない場合は、他の MsoTriState 定数のいずれかを返します。 値の取得と設定が可能です。
構文
式。AllCaps
式Font オブジェクトを表す変数。
戻り値
MsoTriState
注釈
AllCaps プロパティを msoTrue に設定すると、SmallCaps プロパティが msoFalse に設定され、その逆も同様です。
AllCaps プロパティ値は、Microsoft Office タイプ ライブラリで宣言されている MsoTriState 定数のいずれかにすることができます。
例
次の使用例は、作業中の文書の選択したテキストにすべて大文字が設定されている文字があるかどうかを調べます。 この例が機能するには、テキストが選択されたアクティブなパブリケーションが必要です。
Public Sub Caps()
If Publisher.ActiveDocument.Selection _
.TextRange.Font.AllCaps = msoTrue Then
MsgBox "Text is all caps."
Else
MsgBox "Text is not all caps."
End If
End Sub
次の使用例は、選択したテキストにすべて大文字を設定します。 この使用例が動作するには、作業中の文書のテキストが選択されている必要があります。
Public Sub MakeCaps()
If Publisher.ActiveDocument.Selection.TextRange _
.Font.AllCaps = msoFalse Then
Selection.TextRange.Font.AllCaps = msoTrue
Else
MsgBox "You need to select some text or it is already all caps."
End If
End Sub
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。