Cell.CellTextOrientation プロパティ (Publisher)

指定したテーブル セル内のテキストフローを表す PbTextOrientation 定数を設定または返します。 値の取得と設定が可能です。

構文

式。CellTextOrientation

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

戻り値

PbTextOrientation

注釈

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

例

次の使用例は、最初の行のセルの高さを拡大し、縦書きの見出しを追加します。

Sub VerticalText() 
 Dim rowTable As Row 
 Dim celTable As Cell 
 
 With ActiveDocument.Pages(2).Shapes(1).Table.Rows(1) 
 .Height = Application.InchesToPoints(1.5) 
 For Each celTable In .Cells 
 With celTable 
 .CellTextOrientation _ 
 = pbTextOrientationVerticalEastAsia 
 .TextRange.ParagraphFormat.Alignment _ 
 = pbParagraphAlignmentCenter 
 .TextRange.Text = "Column Heading " _ 
 & celTable.Column 
 End With 
 Next 
 End With 
End Sub

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

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