VBA再入門
セルに数字や文字を入れる（RangeとCells）

さっそく書いてみましょう。
sub 練習3
Enter
TAB
range("A1")="おはよう"
Enter

このようになっていますね、
では入力カーソルが、
Sub 練習3 ～ End Sub の間にある状態で実行F5
A1セルに、
おはよう
と表示されました。

このように、セルに文字を入れる場合は、
Range("ここにセルの番地を書く") = "文字"
これで、指定のセルに文字が入ります。
この時、セルの番地である、
A1
これは大文字で書くようにして下さい。
大文字で書くのは、
シートに数式を入れたときA1は大文字になりますよね、これと同じようにしたいからで見易さの為です。

続けて書いていきます。
こんどは、
練習3の中に追加する形で書きます。
Range("A1") = "おはよう"
の下の行に、
range("A2")=12345
Enter

こうなりましたね。
=の前後は、半角の空白を入力しなくても、勝手に前後に半角の空白が入って見やすくなります。
また、
何も書かれていない行が出来ますが気にしなくて大丈夫です。
何も書かれていない空白行は、VBAでは何の影響もなく、空白行があっても無くても動作に違いはありません。

それでは、実行F5

A2セルに12345と表示されます。
以上のように、セルに数字を入れるには、
Range("ここにセルの番地を書く") = 数字
これで、指定のセルに数字が入ります。
シートの数式と同じように、
文字を書くときは、"ダブルクオーテーションで囲む規則があります。
それ以外は、数字も文字も同じように扱えます。
ここまでは簡単だったかと思います。
本題はこれからです。
VBAでは、セルの書き方が多数あります。
エクセルの基本の単位ですから、いろいろな書き方が用意されています。

では、プロシージャーを追加して書き進めます。
sub 練習4
Enter
TAB
cells(3, 1)="こんばんは"
Enter
cells(4, 1)=54321
Enter

これを実行F5すると、

このように表示されます。
Cells(行数, 列数) = "文字"
Cells(行数, 列数) = 数字
先のRangeとちょっと違いますね。
Rangeでは、シートでのセル指定と同じように、
列記号,行数
Cellsでは、
行数, 列数
このように指定します。
とても間違えやすいのですが、慣れてください、慣れるしかありません。
ただ、少しだけエクセルでは親切なところがあって、
Cells(行数, 列記号)
このような書き方が出来ます。

これを実行すれば、

このような結果になります。
ただし、Cellsにおいて列記号での指定は補助的なものです。
これから他の人の書いたマクロを目にすることも多くなると思いますが、列記号での指定は限定的にしか使われていません。

さて、
RangeもCellsも説明しました、これでセルの指定が終わりかというと・・・
もう少しだけあります、そして、ちょっと難しくなります。
ここまでは、1つのセルだけに値を入れました。
複数のセルに値を入れたい時は・・・
さらに追加して書いていきます。
range("A6:C6")="一括入力"
Enter

実行結果は、

Rangeの中に指定するセル範囲は、シートでの計算式と同様に、
開始セル:終了セル
これでセル範囲を指定できます。
これは、シートの計算式でセル範囲を指定するときの書き方と同じ書き方になりますので理解しやすいはずです。
さらに、このような書き方もします。
range(cells(7,1),cells(7,3))="一括入力2"
Enter

実行結果は、

Range(開始セル, 終了セル) = "文字"
Range(開始セル, 終了セル) = 数字
これで、開始セルから終了セルの矩形(四角)の範囲に値が一括入力できます。
開始セル、終了セルの指定は、
Rangeの中に書くセル指定は、RangeでもCellsでも、どちらでも問題ありません。

Range(Cells(7, 1), Cells(7, 3)) = "一括入力"
Range(Range("A7"), Range("C7")) = "一括入力"
Range(Cells(7, 1), Range("C7")) = "一括入力"
Range(Range("A7"), Cells(7, 3)) = "一括入力"
上記のどれでも、同じ意味で同じ動作となります。
セルの指定方法は、数限りなくあります。
本当にたくさんあるのです。
ですが、ここで取り上げた書き方だけ覚えれば十分です。
これ以上の、複雑な指定方法を覚える必要はありません。
それでは、そもそも、
RangeとCellsのどちらを使えば良いのか・・・
Range("A6:C6") = "一括入力"
Range(Cells(7, 1), Cells(7, 3)) = "一括入力2"
「これなら、上の指定の方が簡単だよね！」
その通りなのですが、マクロをいろいろ書いていくと、上のRangeだけの指定では都合が悪い場合が出てきます。
その為にも、今のうちに基本中の基本である、セルの指定については、しっかりと覚えてください。
Rangeは、範囲の意味の英単語です。
従って、範囲を指定する最後の一括入力のようなセル範囲を指定する場合は、Rangeでしか書くとが出来ませんので、当然Rangeを使います。
それ以外で、単一のセルを指定する場合ですが、
基本はCellsです。
ただし、シート上で今後移動する可能性の少ない固定位置のセルを指定する時は、Rangeも使います。
つまり、このセルに決まっている、セル位置を明確にしたい場合です。
そのような場合は、セル番地を文字で指定できるRangeの方が、後々見やすいだろうという事です。

基本は、Cells
複数セル範囲を指定する時は、Range
移動しない固定セルを指定する時は、どちらでも良いがRangeの方が見やすい
今は、これで覚えてください。
今後も、セル指定はずーと出てきます、色々とでてきますので、都度解説します。

第8回.セルに文字を入れるとは（Range,Value）
第9回.Rangeでのセルの指定方法
第10回.Range以外の指定方法（Cells,Rows,Columns）
第11回.RangeとCellsの使い方

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