Negatif Sayıları Vurgulama isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Kod çalıştıktan sonra alınan görüntü aşağıdaki gibidir:
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub NegatifSayılarıVurgulama()
Dim Alan As Range
For Each Alan In Selection
If WorksheetFunction.IsNumber(Alan) Then
If Alan.Value < 0 Then
Alan.Font.Color = -16776961
End If
End If
Next
End Sub
Açıklama
Kodu çalıştırmadan önce verilerin olduğu aralığı seçiyoruz.Kod çalıştıktan sonra alınan görüntü aşağıdaki gibidir:
Faydalanılması temennisiyle