VBA-セル内部の色表示について

質問

以下のプログラムで、セルを結合して色を設定しています。

For i = 4 To 63
　　With Sheet1.Range(Cells(4, i), Cells(4, i + 1))
　　　　.MergeCells = True '結合
　　　　.Interior.ColorIndex = 35 '薄い緑色・・・(1)
　　End With
　　i = i + 1
Next

その後、エクセルのワークシート上のコマンドボタンをクリックすると、
色なしの元の状態に戻したいのですが、(1)の部分を以下にすると、
『.Interior.ColorIndex = 2 '白色』
セル内部を塗りつぶすため、罫線の外周までも白くなってしまいます。

白で塗りつぶすのではなく、元の「色なし」の状態にするプログラムを
どなたか教えて下さい。

回答No.1

noname#123709 · ベストアンサー

Interior.ColorIndex = xlNone
で色無しの状態にできます。

お礼

回答ありがとうございます。

無事解決することができました。

回答No.2

ion12wat

「マクロの記録」を利用すると以下のようになりますよ。

Selection.Interior.ColorIndex = xlNone

お礼

回答ありがとうございます。

無事解決することができました。