Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

文字の向きを表す値を取得・設定する（Orientation プロパティ）

2015/07/15 2015/08/26

Orientation プロパティ

Orientation プロパティで、文字列の向きを表すバリアント型（Variant）の値を取得、または設定します。数値（-90 ～ 90）または方向を表す定数（XIOrientation 列挙型）を使用します。

【書式】

＜取得＞
result = Object.Orientation

＜設定＞
Object.Orientation = long

引数・戻り値

object ・・・対象となる Range オブジェクトを指定します。
long ・・・文字列の向きを表す値を指定します。角度を -90 ～ 90 の間の数値で指定するか、方向を示す XIOrientation 列挙型 の定数を用いることができます。
result ・・・文字列の向きを表す値（角度または、XIOrientation 列挙型の定数値）。

longに指定する値(XIOrientation 列挙型等)

定数	値	角度（内容）
xlDownward	-4170	-90°（下向き）
xlHorizontal（既定値）	-4128	0°（水平方向）
xlUpward	-4171	90°（上向き）
xlVertical	-4166	（縦方向でセルの中央に配置）

Orientation プロパティ使用例

サンプルVBAソース

　
Sub SampleOrientation()

    'xlDownward
    Range("A1").Orientation = xlDownward

    'xlHorizontal
    Range("A2").Orientation = xlHorizontal
    
    'xlUpward
    Range("A3").Orientation = xlUpward

    'xlVertical
    Range("A4").Orientation = xlVertical

    '0度
    Range("A5").Orientation = 0

    '45度
    Range("A6").Orientation = 45

    '90度
    Range("A7").Orientation = 90

    '-45度
    Range("A8").Orientation = -45

    '-90度
    Range("A9").Orientation = -90

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

　

Sub SampleOrientation()

'xlDownward

Range("A1").Orientation = xlDownward

'xlHorizontal

Range("A2").Orientation = xlHorizontal

'xlUpward

Range("A3").Orientation = xlUpward

'xlVertical

Range("A4").Orientation = xlVertical

'0度

Range("A5").Orientation = 0

'45度

Range("A6").Orientation = 45

'90度

Range("A7").Orientation = 90

'-45度

Range("A8").Orientation = -45

'-90度

Range("A9").Orientation = -90

End Sub

　

実行結果

- セルの操作 Orientation プロパティ, Range オブジェクト, VBA基本, エクセルVBA, セルの操作, 文字列の向き

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: 並べ替え（Sort オブジェクト, SortFields コレクション）

Sort オブジェクトによる並べ替え Excel 2007 以降のバージョンでの …

: ハイパーリンク（Hyperlink オブジェクト）

Hyperlink オブジェクト Hyperlinks コレクションのメンバー …

: セル範囲を結合・結合を解除（Merge メソッド・UnMerge メソッド）

Merge メソッド・UnMerge メソッドセルを結合するには、指定したセル …

: セルの文字列を取得（Text プロパティ）

Text プロパティセルに表示されている文字列を取得します。Text プロパテ …

: オートフィルタ（日付による抽出）AutoFilter メソッド

日付で、抽出する（AutoFilter メソッド）【書式】 object.Au …

: オートフィルタ（平均より上・平均より下）AutoFilter メソッド

平均値よりも大きい（小さい）値のレコードを抽出 AutoFilter メソッドで …

: 直前のセル・直後のセルを参照する（Previous プロパティ・Next プロパティ）

Previous プロパティ・Next プロパティ Previous プロパティ …

: 使用中のセル範囲を取得（UsedRange プロパティ）

UsedRange プロパティ UsedRange プロパティは、指定したワーク …

: 引数に指定したセル範囲の共通のセル範囲を取得（Intersect メソッド）

Intersect メソッド Intersect メソッドは、引数に指定したセル …

: アクティブなセルを参照する（ActiveCell プロパティ）

ActiveCell プロパティ ActiveCell プロパティは、各ウィンド …

PREV: セル幅・高さの既定値（StandardHeight プロパティ・StandardWidth プロパティ）
NEXT: 文字列の横位置を取得・設定する（HorizontalAlignment プロパティ）