Home » エクセルマクロ・Excel VBAの使い方 » 配列 » Rangeと2次元配列のFor Each～Nextループの順番

Rangeと2次元配列のFor Each～Nextループの順番

対象：Excel2007, Excel2010, Excel2013, Windows版Excel2016

セル範囲の値を簡単に2次元配列にできることは、ある程度Excel VBAを使っている方ならご存知のはずです。

この2次元配列にした場合と、セル範囲直接の場合で、For Each～Nextループを回したときに処理する順番が異なることをご存知ない方もいらっしゃるようですので、記事にしておきます。

上図のように
　A1:C1セルに「い」「ろ」「は」
　A2:C2セルに「松」「竹」「梅」
と入力しておいて確認してみましょう。

［スポンサードリンク］

RangeオブジェクトをFor Each～Nextループで処理するサンプルマクロ

以下のSubプロシージャを実行すると、
　「い」「ろ」「は」「松」「竹」「梅」
の順番にメッセージが表示されます。

Sub ForEachの順序_Rangeオブジェクト()
　Dim rng As Range
　
　For Each rng In Range("A1:C2")
　　MsgBox rng.Value
　Next rng
End Sub

アルファベットの「z」を書くのと同じような順番に処理されるということです。

これに対して以下のSubプロシージャを実行すると、
　「い」「松」「ろ」「竹」「は」「梅」
の順番にメッセージが表示されます。

Sub ForEachの順序_二次元配列の場合()
　Dim arr As Variant
　Dim itm As Variant

　arr = Range("A1:C2").Value
　For Each itm In arr
　　MsgBox itm
　Next itm
End Sub

こちらは、小文字の「m」を書くのと同じような順番にメッセージが表示されます。

［スポンサードリンク］

Home » エクセルマクロ・Excel VBAの使い方 » 配列 » Rangeと2次元配列のFor Each～Nextループの順番

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓

Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を書きました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本も出しました↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

「配列」の記事一覧