dolgu rengini sayfadan kaldırmak

[hakan_demirkan]

sayfadaki dolgu renklerini kaldıran bir makro arıyorum yardımcı olabilirmisiniz. Kolay gelsin

 

[isteobenim]

Sub dolgutemiz()
Cells.Select
With Selection.Interior
.Pattern = xlNone
.TintAndShade = 0
.PatternTintAndShade = 0
End With
Range("A1").Select
End Sub

 

[hakan_demirkan]

hocam eline sağlık aradığım bu idi tşk.

 

[Necdet]

Merhaba,

Kod verilmiş ama alternatif olsun.

Sub Renk_Kaldir()
    Cells.Interior.ColorIndex = xlNone
End Sub

 

[isteobenim]

Rica ederim,

Necdet Bey'in altarnatifi tabiki daha profosyoneldir.

İyi Çalışmalar,

 

[hakan_demirkan]

teşekkürler hocam ilgilerinizden dolayı