Formüllü hücrelerdeki dolgu rengini kaldır

[levo26]

Merhaba;

Çalışma sayfamda formülleri aşağıdaki kod ile renklendiriyorum. Hangi kod ile bu dolgu rengini kaldırabilirim?

Sub formulleri_renklendir()
On Error Resume Next 'burası formül yoksa hatayı engelliyor
Cells.SpecialCells(xlCellTypeFormulas, 23).Interior.ColorIndex = 4
End Sub

 

[Ömer BARAN]

Merhaba;

Çalışma sayfamda formülleri aşağıdaki kod ile renklendiriyorum. Hangi kod ile bu dolgu rengini kaldırabilirim?

Sub formulleri_renklendir()
On Error Resume Next 'burası formül yoksa hatayı engelliyor
Cells.SpecialCells(xlCellTypeFormulas, 23).Interior.ColorIndex = 4
End Sub

Merhaba.

Kırmızı kısmı aşağıdakiyle değiştirerek olabilir.
.

Cells.SpecialCells(xlCellTypeFormulas, 23).Interior.[B][COLOR="Blue"]Color = xlNone[/COLOR][/B]

 

[levo26]

Hocam çok teşekkür ederim. Saygılar..