VBA再入門
表の先頭から最終行まで繰り返す（ForとEnd(xlUp).Row）

上記の表なら、データの最終行である、
11
これを取得できれば良い訳です。
この11を取得するにはどうしたらよいでしょうか。
数十行、数百行程度なら、スクロールして最終行を目視で確認できますが、
数万行あったら、スクロールも面倒です。
そういう時は、
A列の適当なセル（A1セルで良い）を選択して、
Ctrl + ↓
とすれば、連続データの最終行に飛んでいきます。
上記の表なら、
A1セルで、
Ctrl + ↓
A11セルに選択セルが移動します。
これなら、データが何万行あっても、一瞬で最終行に移動できます。
これをマクロVBAで書くと、
Cells(1, 1).End(xlDown)
このように書きます。
ですが、A列の途中に空白セルがあると、そこで止まってしまいます。
Ctrl + ↓
これを何度も押して、一番下に移動した経験がある方も多いのではないでしょうか。
つまり、上のコードでは、ちゃんとした最終行を取得できません。
また、もし1行目の項目名しかないと、
Ctrl + ↓
これでは、シートの一番下の、1048576行まで行ってしまいます。
ではどうしたら良いか・・・
シートの一番下の行から、
Ctrl + ↑
これで、データの入っている最終行で止まります。
つまり、
A1048576のセルから、
Ctrl + ↑
これで間違いなく、データの最終行に移動できます。
これをマクロVBAで書くと、
Cells(Rows.Count, 1).End(xlUp)
このように書きます。
Rows.Countは、
1048576
という数値と同じ意味です。
シートの一番下の行の数値、つまり、シートの全行数を取得しています。
ですので、
Cells(1048576, 1).End(xlUp)
これと同じことになります。
.End(xlDown)
.End(xlUp)
これらが、
Ｃｔｒｌ + ↓やＣｔｒｌ + ↑
これらを意味します。
これで最終行のセルは分かりました。
しかし、これはあくまで最終行のセルです、箱としてのセルそのものです。
行数ではありません。
セルの行数は、
.Row
と付け足すと、ぞのセルの行数が取得できます。
つまり、
A1048576のセルから ・・・ Cells(Rows.Count, 1)
Ｃｔｒｌ + ↑で移動したセル ・・・ .End(xlUp)
の行数 ・・・ .Row
という事です。
Cells(Rows.Count, 1).End(xlUp).Row
このように書くと、最終行の行数になります。
最初の画像の表なら、
Cells(Rows.Count, 1).End(xlUp).Row
これは、
11
にまります。
つまり、
Cells(Rows.Count, 1)
これは、
A1048576セルの事で
そこから、
.End(xlUp)
そのセルからCtrl + ↑で移動したセルの.Row行番号という事です。

そこで、前回の繰り返し処理の
For i = 2 To 11
この終了値の
11
を
Cells(Rows.Count, 1).End(xlUp).Row
これに取り替えることで、
（デー件数が変わっても）常に最終行まで処理されるようになります。

これを変更して、

このようにすることで、常に最終行まで処理されます。
実際に、データを追加したり、削除して、
ちゃんと最終行まで計算されることを確認してください。

上記の最終行取得のVBAコードを説明しようとすると、かなり難しい文法説明が必要になります。
VBAを書くだけなら、上記のコードをコピペすれば済むことです。
オブジェクト、プロパティ、メソッド
ここを訪れるまでに、書籍やネットでVBAを勉強したことある人は、これらの言葉で挫折した人も多いのではないでしょうか。
オブジェクトとは

上記の最終行取得のコードを、これらの用語を使って説明しても簡単に理解できるものではありません。
そのような説明を聞いて理解できるなら苦労しないし、ここには来ていないはずです。
こういう事をちゃんと覚えるのは後回しにしましょう。
今の段階では、用語としてそういう言い方をすると、それだけの理解で十分です。
マクロを書くのに、このようなオブジェクト、プロパティ、メソッドが何で、どういうものかなどという事は、知らなくても書けます。
しかし、書籍やネットを見れば、このような用語が出てきますし、
エクセルも、書き間違えてエラーを起こすと、これらの言葉で注意します。
その時に、何の事かが分からないと困ってしまいます。
逆に言えば、そのような時に困らなければ、それで十分だという事です。
本当に詳しい話、本質を語れば、
そもそもオブジェクト、プロパティ、メソッドの違いなんて、ほとんど大した違いはありません。
VBAでの使い方・書き方の違い程度の事でしかないのです。
オブジェクトは、階層構造になっていて、オブジェクトの中にオブジェクトがある。
（あらゆる物体は、より小さな物体の集まりです）
オブジェクトは、プロパティとメソッドの集合体である。
（どういう物体かをプロパティが決めていて、メソッドでその物体は動かせる）
このようにイメージしてください。
これらの用語については、後の回にもう少し詳しく解説します。

第18回.最終行の取得（End,Rows.Count）

オブジェクト式について

同じテーマの記事
新着記事
アクセスランク