Negatif Sayıları Vurgulama

Negatif Sayıları Vurgulama

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.

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.

1714331036612.webp


Kod çalıştıktan sonra alınan görüntü aşağıdaki gibidir:

1714331042117.webp


Faydalanılması temennisiyle
 
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst