マクロを使用したボタンに関してですが・・・

質問

マクロ初心者ですが、ボタンの事に関してお聞きします。

あるセル（例　C4）を参照して、数値が入ってたら、その下のセル（例　C5）に色をつける
と、いうマクロを作成し、ボタンに格納しているのですが
C4が数値の入っていない、空白（"")の状態だとエラーが出てしまいます。

この場合、追加すればいいのはどのようなコードになりますでしょうか？または、エラーの出ないいい方法などはございますでしょうか？
ご存知の方、よろしくおねがいします＾＾；

回答No.1

okormazd · ベストアンサー

普通はエラーは出ない。
コードを書いてくれないと「追加すればいいのはどのようなコードになりますでしょうか」なんていわれても「わからん」。
たとえば、コード？

Sub test()

If Range("c4") <> "" Then
Range("c5").Interior.ColorIndex = 3
Else
Range("c5").Interior.ColorIndex = 0
End If

End Sub

お礼

okormazd様、たとえば、コード？を拝見して
自分のコードに当てはめて、改めて考えてみたら
何とかいけました＾＾；

夜遅くにありがとうございました

補足

回答ありがとうございます、okormazd様

質問内容が簡素過ぎて失礼しました＾＾；
Sub ボタン_Click()
ATARI = Range("B2").Value

With ActiveSheet
.Cells(ATARI , 3) .Interior.ColorIndex = 38
.Cells(ATARI , 3) .Interior.ColorIndex = 38
.Cells(ATARI , 3) .Interior.ColorIndex = 38
end with
end sub

かなり短縮してますが、こんな感じです。