質問: エクセルのマクロについてです 現在私は 1,2,3,10,1... 32,4,1,0,5 ... のような可変長のシート?
回答: 下記の構文でどうでしょうか? ・A1~D3の範囲を選択した状態でマクロを実行すると、範囲内でセルの値が「6」のセルを黄色に塗りつぶす構文になっています。 ・なお、セルの範囲が「A1:D3」と決まっているなら、 Set Rng = Selection の部分を、 Set Rng = Range("A1:D3") と変更して下さい。 Sub Macro1() Dim Rng As Range, R As Range Set Rng = Selection For Each R In Rng If R.Value = 6 Then R.Interior.ColorIndex = 6 End If Next R Set Rng = Nothing End Sub