TextEffectFormat.KernedPairs プロパティ (Publisher)

ワードアート オブジェクト内の文字ペアがカーニングされているかどうかを示す MsoTriState 定数を設定または返します。 値の取得と設定が可能です。

構文

式。KernedPairs

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

戻り値

MsoTriState

注釈

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

例

次の使用例は、作業中の文書のすべてのワードアート オブジェクトでの文字のカーニングを有効にします。

Sub KernedWordArt() 
 Dim pagPage As Page 
 Dim shpShape As Shape 
 For Each pagPage In ActiveDocument.Pages 
 For Each shpShape In pagPage.Shapes 
 If shpShape.Type = msoTextEffect Then 
 shpShape.TextEffect.KernedPairs = msoTrue 
 End If 
 Next 
 Next 
End Sub

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

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