Home » いちばんやさしいExcel VBAの教本 » For～Next文で増分値をマイナスにするとイイ実例

For～Next文で増分値をマイナスにするとイイ実例

対象：Excel 2010, Excel 2013, Windows版Excel 2016

拙著『いちばんやさしいExcel VBAの教本』の、Lesson 43「For～Next文の繰り返し条件を使いこなしましょう」で、「Step -1」のように増分値をマイナスで指定できることに触れています。

マイナスの増分値

どういうときに、For～Next文の増分値をマイナスにするほうがいいのか、補足しておきます。

行を削除するつもりで正しく動作しないサンプルマクロ

例えば何らかの条件によって行を削除するマクロは、実務で必要になりがちです。

この処理を、以下のようなコードにしてしまう入門者は少なくありません（問題の箇所を明確にするために条件分岐を除外しています）。

Sub 行を削除する_ダメなケース()
　Dim i As Long

　For i = 1 To 5
　　Rows(i).Delete
　Next i
End Sub

1行目から5行目が順番に削除されることを期待したSubプロシージャですが、この形では元の2行目と4行目が削除されずに残ってしまいます。

こういったときに増分値をマイナスにします。
以下のSubプロシージャなら、1～5行目が順番に削除されます。

Sub 行を削除する_OKなケース()
　Dim i As Long

　For i = 5 To 1 Step -1
　　Rows(i).Delete
　Next i
End Sub

このようにループ処理する対象の数が、途中で減ってしまうようなときが、マイナスの増分値が有効な代表例です。

マイナスの増分値にすれば、行を削除できることは実行すればわかるとして、先にご紹介した正しく動作しないほうのマクロで、何故ダメなのか、ご自分の手を動かして確認しておきましょう。

行を削除する_ダメなケース

カウンタ変数iが「2」のときに、ワークシートがどういう状態になっているか、そのときに削除されるのかがどの行なのかをしっかり意識すればわかるはずです。

伊藤潔人インプレス 2018-01-17

［スポンサードリンク］

Home » いちばんやさしいExcel VBAの教本 » For～Next文で増分値をマイナスにするとイイ実例

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
Excel VBAユーザーの皆さんに向けたWord VBA入門書を、キンドル本として出しました↓↓

[図形に関連するオブジェクトモデルの基本を、拙著『理解するExcel VBA／図形操作の基本』では解説しています↓↓

2年前(2020年5月)の
人気記事

「いちばんやさしいExcel VBAの教本」の記事一覧