IT業界1週間目の初心者です。わからないことがあるのでご質問します。
現在for文でセルを指定し、指定された範囲のみに処理をしたいのですがうまくいきません。
具体的にはセル範囲H3;J32に存在している値で偶数のみを赤色にしたい。
該当のソースコード
Sub As()
'変数の定義
Dim row as Integer, col as Integer 'ループで使う 行と列のIndexの変数
for row=3 to 32'3行目から32行目まで
for col=8 to 10 'H列からJ列まで
If (Range("H3:J32").cells(row,col).value Mod 2) = 0 Then
Range("H3:J32").cells(row,col).Font.ColorIndex = 3
End If
next col
next row
End Sub
疑問
上記のコードは昨日質問し、回答いただいたものです。for文でセルの範囲を指定していると解釈しているのですが、間違っているでしょうか。余裕があれば教えていただけるとうれしいです。
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
退会済みユーザー
2018/04/22 08:42