Renklendirilen Hücrenin Başka Sayfa Taşınması

[1Al2Ver]

Merhabalar,

Farklı bir sayfada, C3:T30 aralığındaki hücreleri manuel olarak sarı veya kırmızı renk yaptığımda, bu renkler diğer sayfadaki isimlerle ve harflerle eşleşmeli ve ilgili hücreleri sarı veya kırmızı olarak renklendirmeli,

Bu işlemi C3:T30 tablosunu aynı sayfaya taşıyarak Koşullu Biçimlendirme ile yapabilmekteyim, ancak her defasında tabloyu taşımak, sayfada yer tutmakta,

Bu sebeple farklı bir çözüm aramaktayım, teşekkür ederim.

 

[Orion1]

Dosyanız ekte.

Private Sub Worksheet_Activate()
Dim i As Byte, k As Long, sat As Long, sut As Byte
sut = 3
Application.ScreenUpdating = False
Range("C3:E" & Cells(65536, "B").End(xlUp).Row).Interior.ColorIndex = xlNone
For i = 3 To 21 Step 6
    sat = 3
    For k = 5 To Cells(65536, "B").End(xlUp).Row
        Cells(sat, sut).Interior.ColorIndex = Sheets("AnaTablo").Cells(k, i).Interior.ColorIndex
        sat = sat + 1
    Next k
    sut = sut + 1
Next i
Application.ScreenUpdating = True
End Sub

 

[1Al2Ver]

Dosyanız ekte.

Private Sub Worksheet_Activate()
Dim i As Byte, k As Long, sat As Long, sut As Byte
sut = 3
Application.ScreenUpdating = False
Range("C3:E" & Cells(65536, "B").End(xlUp).Row).Interior.ColorIndex = xlNone
For i = 3 To 21 Step 6
    sat = 3
    For k = 5 To Cells(65536, "B").End(xlUp).Row
        Cells(sat, sut).Interior.ColorIndex = Sheets("AnaTablo").Cells(k, i).Interior.ColorIndex
        sat = sat + 1
    Next k
    sut = sut + 1
Next i
Application.ScreenUpdating = True
End Sub

Sayın Evren Gizlen, merhaba

Belki sorunumu iyi dile getiremedim, çünkü makro sorunumu çözmedi,

Data sayfasında seçilen hücre manuel renklendirilince, AnaTablo sayfasına taşınmıyor, sayfalar arası giriş çıkış halinde ise Data sayfasında renklendirilen hücrenin rengi kalkıyor,

Data sayfası C12'de kayıtlı "D" nin manuel renklenmesi ( örn; sarı ) halinde,

AnaTablo sayfasındaki B12'nin (Dursun Mayta), Data sayfası B12 ile (Dursun Mayta) eşleşip AnaTablo sayfası C12 hücresinin renklenmesi ( örn ;sarı ) gerekmektedir.

Gösterdiğiniz nezaket ve zahmetiniz için teşekkür ederim, saygılarımla.

 

[1Al2Ver]

Merhaba,

Soru makro ile çözülebilir ise çok makbule geçecek, teşekkür ederim.

 

[1Al2Ver]

Merhabalar,

Sanıyorum uzman arkadaşlarımın yoğunluğu nedeniyle çözüm alamıyorum,

Macro ile çözülebilmesi uzun uğraş gerektiriyor ise ben yine bilinen yöntem ile devam edebilirim,

İlgilenen arkadaşlara teşekkür ederim.

 

[Korhan Ayhan]

Selamlar,

Verdiğiniz örneğe göre DATA sayfasında Dursun Mayta ismine karşılık C12 hücresinde "M" harfi yazıyor. Fakat AnaTablo isimli sayfada aynı isme karşılık C sütununda "D" harfi yazıyor. Bu durumda isimler eşleşiyor fakat hücrelerdeki veriler eşleşmiyor.

Soru1 : Bu halde dahi renklendirme aktarılacak mı?
Soru2 : Aktarım işlemi tüm tablo bazındamı olacak? Yoksa aktif hücreye göremi işlem yapılacak?

 

[1Al2Ver]

Selamlar,

Verdiğiniz örneğe göre DATA sayfasında Dursun Mayta ismine karşılık C12 hücresinde "M" harfi yazıyor. Fakat AnaTablo isimli sayfada aynı isme karşılık C sütununda "D" harfi yazıyor. Bu durumda isimler eşleşiyor fakat hücrelerdeki veriler eşleşmiyor.

Soru1 : Bu halde dahi renklendirme aktarılacak mı?
Soru2 : Aktarım işlemi tüm tablo bazındamı olacak? Yoksa aktif hücreye göremi işlem yapılacak?

Sayın Korhan Ayhan, haklısınız Data sayfasındaki C12 nin karşılığı "M" dir, AnaTablo sayfasındaki C12 nin karşılığı da "M" dir, gözümden kaçmış, kesinlikle isimler ve harfler eşleşiyor,(bunları formülle taşıtıyorum)

Aktarma, hücre renklendikçe gerçekleşecek, Data sayfasından aktarılan hücreler Data sayfasında bozulmadan kalmalı,

Dikkatiniz ve ilginiz için ayrıca teşekkür ederim.Saygılarımla.

 

[Korhan Ayhan]

Selamlar,

Hücre renklendikçe aktarma işlemi yapılabilmesi için tetiklenmesi gereken bir olay gereklidir. Maalesef hücredeki renk değişimi için tetiklenecek bir olay mevcut değildir. Ancak hücrenin rengini değiştirip bir butona basıp makroyu çalıştırabiliriz.

 

[1Al2Ver]

Selamlar,

Hücre renklendikçe aktarma işlemi yapılabilmesi için tetiklenmesi gereken bir olay gereklidir. Maalesef hücredeki renk değişimi için tetiklenecek bir olay mevcut değildir. Ancak hücrenin rengini değiştirip bir butona basıp makroyu çalıştırabiliriz.

Sayın Korhan Ayhan, bir buton ile aktarmak ta sorunu çözer, yeterki aktardığı hücreleri silmesin, bozmasın,

Teşekkür ederim, saygılarımla.

 

[Korhan Ayhan]

Selamlar,

Ekteki örnek dosyayı incelermisiniz. Renklendirme yaptıktan sonra ilgili hücrede çift tıklayın. Renksiz hücrelere işlem yapılmayacak şekilde ayarladım.

 

[1Al2Ver]

Selamlar,

Ekteki örnek dosyayı incelermisiniz. Renklendirme yaptıktan sonra ilgili hücrede çift tıklayın. Renksiz hücrelere işlem yapılmayacak şekilde ayarladım.

Sayın Korhan Ayhan, elinize sağlık, sayenizde projem çok güzel oldu, ne kadar teşekkür etsem azdır, sağolun, varolun, saygılarımla.