DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Function renk(Aralık As Range, Optional Renkadi As Boolean)
Dim Renk1 As String, IndeksNo As Integer
[COLOR=red]Application.Volatile[/COLOR]
Select Case Aralık.Interior.ColorIndex
.....
End Function