構文
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
注意点
- 特にありません。
コメント