こんにちは～
ドットコムパソコン塾の徳丸です
今日は初心に帰って、変数とはなんぞや？の説明をしていこうと思います。
偶数だけにセルの塗りつぶしを赤にしていくという
簡単な課題で変数の勉強しましょう。
例えば、セルA2からA50までにデータが入っているとします。
2行目から50行目までの数字を順番にチェックしていくために
最初の変数を2行目の2
次の変数を1加算して、3行目の3
このように変数を加算していきながら、
各行を調べていきます。
Sub 変数() 'マクロ名
Dim i As Long '整数
For i = 2 To 50 '変数Iを2～50まで一つずつ加算していく
If Cells(i, 1) Mod 2 = 0 Then '1列目のI行のセルの値が偶数の場合は
Cells(i, 1).Interior.Color = vbRed 'そのセルを赤く塗りつぶす
End If 'Ifの終わり
Next i 'Iに1を加算して繰り返す
End Sub
上記のように赤字で説明を加えています。
マクロを実行すると下図のようになります。
いかがでしょうか？
変数 I は変わっていくんですね～
〒503-0204
岐阜県安八郡輪之内町四郷211-1
ドットコム・パソコン塾
TEL：0584-69-3839
開校日：月曜日～土曜日8：00～13：00
プライベートレッスン：月曜日～土曜日13：00～17：00
休校日：日曜日・祝日
