B Sutunu A Sutunundan Kücük Veya Eşit Olunca Yansın

[Falkent]

Selamun Aleyküm Arkadaişlar Ben Exelde B Kolonu A Kolonundan Kücükse Veya Eşitse B Kolonun Eşit Olmayan Hücresı Yanıp Sonsun İstiyorum Yani Ben Yaptım Ama sadece 1 Hucre İcin Gecerli Oluyor Ben B Kolonun Butun Hucrelerinde uyarı vermesını istiyorum Tabi Kücük Veya Eşit Olmayana Hucrelerde Ne Olur yardımlarınızı beklıyorum sımdıden teşk ediyorum hayırlı ramazanlar

benim kodum
sayfa1 e yapıstırdıgım kod

Option Explicit
Public CellCheck As Boolean
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Range("a1") >= Range("B1") And CellCheck = False Then
Call StartBlink
CellCheck = True
ElseIf Range("a1") <> Range("B1") And CellCheck = True Then
Call StopBlink
CellCheck = False
End If
End Sub

Module 1 E Yapıstırdıgım Kod

Option Explicit
Public RunWhen As Double
Sub StartBlink()
If Range("B1").Interior.ColorIndex = 3 Then
Range("B1").Interior.ColorIndex = 6
Else
Range("B1").Interior.ColorIndex = 3
End If
RunWhen = Now + TimeSerial(0, 0, 1)
Application.OnTime RunWhen, "StartBlink", , True
End Sub
Sub StopBlink()
Range("B1").Interior.ColorIndex = xlAutomatic
Application.OnTime RunWhen, "StartBlink", , False
End Sub

bunlar sadece 1 inci hucereler gecerli ben butun a ve b hucrelerı icin gecmesını ıstıyorum yanı sonsuz

 

[Necdet]

Merhaba,

Bence siz örnek bir dosya ekleyiniz.

 

[Falkent]

Necdet Abi Buyur Link
http://www.dosyaupload.gen.tr/download.php?file=b4b243083e66f16554fc68705cb9d358

 

[Falkent]

Sadece b1 de ışık yanıyor b2,b3,b4,b5..... hepsi icin bu kuralın olmasını istiyorum b1 KUCUKSE VEYA EŞİTSE A1 den ısık yanıyor

 

[Falkent]

? cevap yokmu kimseden arkadaşlar

 

[Necdet]

Merhaba,

Sizin yaptırmak istediğiniz gibi olur mu bilmiyorum, hadi tek hücre tamam da bir kaç hücre nasıl çalışır bilmiyorum.

Mantık yürüttüğümde ise exceli çok yoracağını düşünüyorum.

Bunun yerine Koşullu Biçimlendirmeyi deneyebilirsiniz.

Excel Dersanesinde ilgili açıklamayı bulabilirsiniz.

 

[Falkent]

Tamm Bende imkansız gibi dusundum ama Adamlar istiyor işte sen ne kadar imkansız dersen de anlamıyorlar. Teşşekür ederim Necdet abi Ellerin Derd Görmesin. Allah Zeval Vermesın Kolay gelsin