Hatalı Hücreleri Renklendirme isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub Hatali_Hucreleri_Renklendirme()
Dim Alan As Range
Dim i As Integer
For Each Alan In ActiveSheet.UsedRange
If WorksheetFunction.IsError(Alan) Then
i = i + 1
Alan.Style = "Kötü" 'ingilizce versiyonlar "Bad" yazılır
End If
Next Alan
MsgBox "Toplam " & i & " hatalı hücre var."
End Sub
Açıklama
Kod çalıştıktan sonra hatalı alanlar renklenir ve MsgBox ile kaç hatalı alan olduğu sayısı verilir.Faydalanılması temennisiyle