benzer hücre

[eseseski]

herhangi bir hücreyi seçtiğimde benzer içerikteki hücreler diğer hücrelere göre daha belirgin duruma gelebilirmi

 

[Necdet]

herhangi bir hücreyi seçtiğimde benzer içerikteki hücreler diğer hücrelere göre daha belirgin duruma gelebilirmi

Benzer içerikli hücreler?

 

[eseseski]

sayın üstad benzer içerikli hücre derken örnekte veriş olduğum sayfada b4 deki a.çalışırın üstüne geldiğimde diğer hücrelerdeki a.çalışır içerikli hücreleri kastettim

 

[Necdet]

Merhaba,

Sizin dosyanızda ne yapmak istediğinizi pek anlamadım. Koşullu Biçimlendirme de var.
Örnek olması açısından dosyayı inceleyiniz.

Kodlar ilgili sayfanın kod bölümünde olmalı.

T sütunu örnek sütun olarak değerlendirildi. Buradaki herhangi bir dolu hücreye tıkladığınızda o hücre değerini A:R sütunları içinde arar, bulduklarını ilgili hücrenin biçimini (font, renk vs, siz bunları çoğaltabilirsiniz) uygular.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
    If Intersect(Target, [T:T]) Is Nothing Then Exit Sub
    If Target.Value = "" Then Exit Sub
    
    Application.ScreenUpdating = False
    
    Dim c   As Range
    Dim Adr As String
    
    With Range("A:R")
        Set c = .Find(Target.Value, LookIn:=xlValues, LookAt:=xlWhole)
        If Not c Is Nothing Then
            Adr = c.Address
            Do
                With c
                    .Font.Bold = Target.Font.Bold
                    .Font.Italic = Target.Font.Italic
                    .Font.Underline = Target.Font.Underline
                    .Font.ColorIndex = Target.Font.ColorIndex
                    .Interior.ColorIndex = Target.Interior.ColorIndex
                End With
                Set c = .FindNext(c)
            Loop While Not c Is Nothing And c.Address <> Adr
        End If
    End With
    
    Application.ScreenUpdating = True
    
End Sub

 

[eseseski]

üstadım sorumu ben anlatamadım fakat siz yinede ne demek istediğimi anlayıp doğru cevaplamışsınız teşekür ederim. eğer anlayışla karşılarsanız bir sorum daha olacak eğer anlatabilirsem şöyle ki;t sütunundan bir hücreyi ikinci seçtiğimizde a:r aralıklarıda daha önce ki seçimle aktif hale gelen hücrelerin seçimi eski haline gelebilirmi.yani rengi ortadan kalkabilirmi tekrar teşekkür ederim sağolun