構文
Range.Orientation= expression
expression・・・-90~90までの値 又は下記表(XlOrientaitoinクラス)の定数
Rangeオブジェクトの Orientationプロパティで文字列の角度を変更し見栄えをよくします。
XlOrientaitoinクラスのメンバ
名前 | 値 | 説明 | 備考 |
xlDownward | -4170 | 下向き | -90と同様 |
xlHorizontal | -4128 | 横書き | (規定値) |
xlUpward | -4171 | 上向き | 90と同様 |
xlVertical | -4166 | 縦書き |
Orientationプロパティのサンプルコード
Public Sub sample() '■セルA1の文字を30度の角度を付ける(右上がりの30度) Range("A1").Orientation = 30 Debug.Print Range("A1").Orientation '30 '■セルB1の文字を-30度の角度を付ける(右下がりの30度) Range("B1").Orientation = -30 Debug.Print Range("B1").Orientation '-30 '■セルA1を含む表に対して文字を縦書きにする Range("A1").CurrentRegion.Orientation = xlVertical '■シート全体の文字を規定値の横書きにする Cells.Orientation = xlHorizontal End Sub
注意点
- 特にありません。
コメント