ParagraphFormat.UseCharBasedFirstLineIndent プロパティ (Publisher)

東アジアの文字幅を使用して段落をインデントするかどうかを指定する MsoTriState 定数を設定または返します。 値の取得と設定が可能です。

構文

式。UseCharBasedFirstLineIndent

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

戻り値

MsoTriState

注釈

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

UseCharBasedFirstLineIndent の値設定できます、クライアント コンピューターで、東アジア言語が有効になっている場合にのみが、東アジア言語が有効になっているかどうかに関係なく、値を返すことができます。 CharBasedFirstLineIndent プロパティの前に UseCharBasedFirstLineIndent を設定する必要があることに注意は、返されるまたは設定できます。 UseCharBasedFirstLineIndent が最初に設定されていない場合は、実行時「アクセスが拒否されました」エラーが返されます。

UseCharBasedFirstLineIndent が msoTrue の場合、段落は東アジアの文字幅を使用してインデントされ、msoFalse の場合はインデントされません。 Msofalse に設定 を既定値には。

例

次の例では、作業中の文書の 4 ページ目にテキスト ボックスを作成します。 UseCharBasedFirstLineIndent プロパティを True に設定すると後、 CharBasedFirstLineIndent プロパティを使用して、先頭行のインデントの幅が 15 ポイントに設定されます。 フォントのプロパティを設定し、段落にテキストを挿入します.

Dim theTextBox As Shape 
 
Set theTextBox = ActiveDocument.Pages(4).Shapes _ 
 .AddShape(msoShapeRectangle, 100, 100, 300, 200) 
 
With theTextBox 
 .TextFrame.TextRange.ParagraphFormat _ 
 .UseCharBasedFirstLineIndent = msoTrue 
 .TextFrame.TextRange.ParagraphFormat _ 
 .CharBasedFirstLineIndent = 15 
 .TextFrame.TextRange.Font.Name = "Verdana" 
 .TextFrame.TextRange.Font.Size = 12 
 .TextFrame.TextRange.Text = "This is a test sentence." _ 
 & Chr(13) & "This is another test sentence." 
End With

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

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