Çoklu Koşullu Biçimlendirme

[ctanyel]

Merhabalar,

Sormak istediğim konu şu konuşullu biçimlendirmeyi bildiğim kadarı ile kullanıyorum ama şöyle bir sorum var sayfa1 de bekleyen cihazların kodları sayfa 2 de gelen parça kodları benim istediğim gelen parçalar bekleyen ler içinde renklensin ve yapacak olan üstad anlaşılır bir dilde anlatırsa çok mutlu olurum şimdiden çok teşekkür ederim.

Arama yapılacak yeri gri olarak renklendirdim.

 

[Murat OSMA]

Gelen sayfasına bir buton ekleyin, sonra da kodları Module yazıp çalıştırın...

Sub Emre()
    Dim i As Integer, a As Integer
    Dim bul As Range
    For i = 2 To Sayfa1.Range("A65536").End(3).Row
        If Sayfa1.Cells(i, "F") = "Parça Bekliyor (ASC)" Then
            For a = 12 To 31 Step 2
                Set bul = Sayfa2.Columns(1).Find(Sayfa1.Cells(i, a), , , xlWhole)
                If Not bul Is Nothing Then
                    bul.Interior.ColorIndex = 36
                End If
            Next a
        End If
    Next i
    MsgBox " ..::.. Aynı olanlar renklendirildi ..::.. ", _
    vbInformation + vbMsgBoxRtlReading, "ctanyel"
    Set bul = Nothing
    a = Empty: i = Empty
End Sub

 

[Erdem Akdemir]

merhaba

P.bekleyen sayfasında L sütununu seçin seçin >koşullu biçimlendirmeden>yeni kural ekle>formül kullan>=EĞERSAY(Gelen!$A:$A;L1)>=1 yazın, biçimlendirme renginizi belirleyin, istediğiniz olacaktır.

 

[ctanyel]

Üstadlar çok teşekkür ederim.

 

[ctanyel]

Peki şöyle birşey yapabilirmiyiz gelen malzemelerin adetleri belli yanında gelen miktari var bekleyen listeside yukarıdan aşağıya gün sırasına göre dizili diyelimki GH97-13630B parçasından 3 adet geldi Bekleyen sayfasındada 4 tane bekleyeni var bana sadece en eski 3 tanesini renklendirmesini istiyorum bunu yapabilirmiyiz acaba.

 

[Erdem Akdemir]

..............