ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

配列の添字の最小値を「1」に設定する

      2015/03/30

Option Base ステートメントを使用する


【書式】
Option Base 1


添字の既定の最小値は 0 です。Option Base ステートメントを使うと既定の最小値を 1 に設定できます。

Option Base ステートメントを使用する場合は、モジュール内のどのプロシージャよりも前に記述する必要があります。Option Base ステートメントは、モジュール内で一度だけ、次元を含む配列の宣言よりも前に記述します。

Option Base ステートメントの設定が有効になるのは、ステートメントが記述されているモジュール内の配列の添字の最小値のみです。


Option Base ステートメントを設定する

モジュールの宣言セクションに Option Base 1 を指定するとモジュール内の配列の添字の最小値が「1」に設定されます。

Open Base ステートメント例1


VBAソース


実行結果

Option Base 1 ステートメントを設定しているため添字の最小値が「1」となります。
( ※ UBound 関数・LBound 関数 は、それぞれ配列の添字の最大値・最小値を取得します。)

Option Base 1 ステートメント例2



Option Base ステートメントに影響されない関数など

Option Base ステートメントを使用しても Split 関数キーワード ParamArray を使って作成する配列の添字の最小値は 0 のままです。
つまり、Split 関数キーワード ParamArray は、Option Base ステートメントの影響を受けません。

例 Split関数(※ Array 関数 と比較)


実行結果

Array 関数は、Open Base ステートメントの影響を受けるため、val1(1)は、「1」を表示します。一方、Split 関数は、Open Base ステートメントの影響を受けないため、val2(1)は、「20」を表示します。

Option Base 1 ステートメント例3


例 キーワード ParamArray


実行結果

Option Base 1 ステートメントの影響を受けていないので、「12」が表示されます。

Option Base 1 ステートメント例4



 - VBA基本 , , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

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

  関連記事

文字列:文字列の長さを取得( Len 関数、LenB 関数 )

Len 関数(文字列の長さを取得) 【書式】 result_len = Len …

配列(宣言・要素数の変更について)

配列の宣言 【書式】※ 配列の宣言 <Type 型の静的配列(固定長配列)の宣言 …

Choose 関数 例01
指定した数値に対応する選択肢の値・数式を返す(Choose 関数)

Choose 関数 の使い方 Choose 関数は、指定されたインデックス値(1 …

Erase ステートメント(配列の初期化・動的配列のメモリ解放)

Erase ステートメントの使い方 【書式】 Erase myArray [, …

オートシェイプの種類を表す定数
オートシェイプの種類を表す定数(MsoAutoShapeType 列挙型)

MsoAutoShapeType 列挙型 オートシェイプオブジェクトの図形の種類 …

色の設定(ColorIndex プロパティ・Colors プロパティ)

ColorIndex プロパティ ColorIndex プロパティは、指定したオ …

Resize プロパティ1
指定したセル範囲のサイズを変更(Resize プロパティ)

Resize プロパティ 指定したセル範囲のサイズ(行数や列数)を変更します。 …

no image
XlThemeColor 列挙型

XlThemeColor 列挙 定数 値 内容 xlThemeColorDark …

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

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

データ型を調べて、そのデータ型を示す数値を返す(VarType 関数)

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