PR

 本連載の第13回目から、目次シートを作るマクロを取り上げきましたが、今回で一段落としましょう。マクロの後半部分、このマクロの肝でもある「For~Next」を使った繰り返し処理について解説していきたいと思います。なお、マクロ全体のコードは、本連載の記事末に掲載してありますので参考にしてください。

シート名を順番に読み取りセルに転記する

 前回ご説明した通り、目次用シートを作るマクロの前半部分では、新しいシートを挿入し、そのシートのA1セルに見出しとなる文字列「---目次---」を入力しました。続いて、この後に実際に行わなければならない作業を、具体的にイメージしてみましょう。

 先頭には目次用の新規シートが作成されています。最初に先頭にあったシートは2番目に配置されているはずです。まずは2番目のシート名を読み取り、先頭にある目次用シートのA2セルにシート名を転記します。同様に、3番目、4番目と、最後のシート名までを順番に読み取ってセルに転記していく必要があります。今回の例でポイントとなるのは、n番目のシートならばA列のn行目のセルに書き込んでいるということです(図1)。


図1 シート名を順番に読み取りセルに名前を転記する