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

Array 関数（バリアント型の配列を作成）

2015/04/03

Array 関数の使い方

【書式】

myArray = Array ( element [, elment, element … ] )

【引数・戻り値の説明】

element ・・・配列 myArray の要素となります
myArray ・・・作成されるバリアント型（Variant）の配列

Array 関数を使用して作成した配列のインデックスの最小値は、通常 0 ですが、Option Base 1 ステートメントを指定するとインデックスの最小値は 1 となります。

Array 関数の使用例

サンプルVBAソース

　
Sub sample_array()

    Dim myArray()
    Dim i As Long
    Dim strArray As String
    
    myArray = Array(100, 200, 300, 400, 500)
    
   
    For i = LBound(myArray) To UBound(myArray)
    
        strArray = strArray & "myArray(" & i & ") = " & myArray(i) & Chr(13)
    
    Next i
    
    MsgBox strArray
    
    
End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

　

Sub sample_array()

Dim myArray()

Dim i As Long

Dim strArray As String

myArray = Array(100, 200, 300, 400, 500)

For i = LBound(myArray) To UBound(myArray)

strArray = strArray & "myArray(" & i & ") = " & myArray(i) & Chr(13)

Next i

MsgBox strArray

End Sub

　

実行結果

サンプルVBAソース（Option Base 1 を指定）

　
Option Base 1


Sub sample_array()

    Dim myArray()
    Dim i As Long
    Dim strArray As String
    
    myArray = Array(100, 200, 300, 400, 500)
    
   
    For i = LBound(myArray) To UBound(myArray)
    
        strArray = strArray & "myArray(" & i & ") = " & myArray(i) & Chr(13)
    
    Next i
    
    MsgBox strArray
    
    
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

　

Option Base 1

Sub sample_array()

Dim myArray()

Dim i As Long

Dim strArray As String

myArray = Array(100, 200, 300, 400, 500)

For i = LBound(myArray) To UBound(myArray)

strArray = strArray & "myArray(" & i & ") = " & myArray(i) & Chr(13)

Next i

MsgBox strArray

End Sub

　

実行結果

- VBA基本 Array 関数, Option Base ステートメント, VBA基本, エクセルVBA

Tweet

Message コメントをキャンセル

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

関連記事

: 文字列：アルファベットを小文字または大文字に変換（LCase 関数,UCase 関数）

LCase 関数・UCase 関数の使い方【書式】＜アルファベットの大文字 …

: 文字列：２つの文字列を比較する（StrComp 関数）

StrComp 関数の使い方【書式】 result = StrComp ( s …

: 乱数を生成する（Rnd 関数）

Rnd 関数の使い方 Rnd 関数は、0 以上、1 未満の範囲の乱数を単精度浮動 …

: セルのデータを固定長形式で複数のセルに分割する（TextToColumns メソッド・Parse メソッド）

固定長形式でセルを分割 TextToColumns メソッドや Parse メソ …

: 列挙型変数（Enum ステートメント）

列挙型変数を使う列挙型変数を使用するには、Enum ステートメントを使って、宣 …

: カレントフォルダの取得・設定（DefaultFilePath プロパティ）

DefaultFilePath プロパティカレントフォルダとは、ブックを開いた …

: 配列の要素数を取得する（UBound 関数・LBound 関数）

UBound 関数・LBound 関数【書式】 result = UBound …

: VBAの変数宣言

VBAの変数宣言について変数を暗黙的に宣言するエクセル VBA の場合、明示 …

: CPU に制御を移す（DoEvents 関数）

DoEvents 関数 DoEvents 関数を実行すると、CPU に制御を移し …

: データ型を調べてそのデータ型を示す文字列を返す（TypeName 関数）

TypeName 関数の使い方 TypeName 関数は、引数に、データ型を調 …

PREV: Erase ステートメント（配列の初期化・動的配列のメモリ解放）
NEXT: Split 関数（文字列型の一次配列を作成）