koşullu biçimlendirme

[serrseri]

Merhabalar;
Koşullu biçimlendirme olan hücreye değer girildiğinde sıkıntı yok yalnız başka sayfadan veya başka hücreden veri kopyalandığında koşullu biçimlendirme iptal oluyor ve çalışmıyor. yapıştırma seçeneklerine göre yapıla biliniyor. ama her türlü kopyala yapıştır yapıldığında hücrede ki koşullu biçimlendirmenin kaybolmamasını istiyorum yardımcı olabilir misiniz? dosya ekte mevcuttur.

 

[YUSUF44]

Kopyala yapıştır yaptığınızda biçimler de yapıştırılır ve o hücre artık eski biçiminde olmaz. Bunu önlemek için değerleri ya da formülleri yapıştırmayı seçebilirsiniz ki bunu zaten biliyorsunuz.

Benim aklıma makrodan başka çözüm gelmiyor. Aşağıdaki kodları ilgili sayfanın kod bölümüne (sayfa adına sağ tıklayıp Kod görüntüle deyince açılan sayfaya) yapıştırırsanız, 5-11. satırlarda, 4. satırda son 3 karakteri "gün" olan, boş olmayan ve 13. satırdan küçük olan hücrelerin rengi mavi olur:

Private Sub Worksheet_Change(ByVal Target As Range)
a = Target.Row
b = Target.Column
If Target = "" Then Target.Interior.Color = xlNone
If a < 12 And a > 4 Then
    If Right(Cells(4, b), 3) = "gün" Then
        If Target <> "" Then
            If Target < Cells(13, b) Then
                Cells(a, b).Interior.Color = vbBlue
            Else
                Cells(a, b).Interior.Color = xlNone
            End If
        End If
    End If
End If
End Sub

 

[serrseri]

Koşullu biçimlendirme

Çok teşekkür ederim ama dosyanın tamamı bu değil formatta değişiklik oldu ayrıca tek tek kopyala yapıştır yapınca sıkıntı olmuyor fakat toplu şekilde kopyala yapıştır yapınca makro hata veriyor. dosyanın güncel hali ektedir. saygılar.