• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

1 satır aralıkla satır renklendirme

Merhaba,

Siz grup olarak renklendirmek istiyorsunuz. Aşağıdaki kodu kullanarak yapabilirsiniz.

-4142 (Dolgu rengi yok) Bunu değiştirip farklı bir renk yapabilirsiniz.

Kod:
Sub Renklendir()
    Dim X As Long, Renk As Integer
    
    Renk = 37
    Range("A2:O" & Rows.Count).Interior.ColorIndex = xlNone
    
    For X = 2 To Cells(Rows.Count, "D").End(3).Row
        If X = 2 Then
            Range("A" & X & ":O" & X).Interior.ColorIndex = Renk
        ElseIf Cells(X, "D") = Cells(X - 1, "D") Then
            Range("A" & X & ":O" & X).Interior.ColorIndex = Cells(X - 1, "D").Interior.ColorIndex
        Else
            If Renk = 37 Then
                Renk = -4142
            Else
                Renk = 37
            End If
            Range("A" & X & ":O" & X).Interior.ColorIndex = Renk
        End If
    Next
    
    MsgBox "İşleminiz tamamlanmıştır.", vbInformation
End Sub
 
Merhabalar yine ben bi problem çıkmaya başladı ama anlamadım düzeltemedimde yardımlarınızı bekliyorum.

Makro içerebilen Excel çalışma kitabı olarak kayıtlı.

 
Bunlar makro kodlarıdır. Dosyanızın açılışında formül çubuğu bölümünde "içeriği etkinleştir" şeklinde uyarı mesajları çıkacaktır. Bunları onaylayarak dosyanızı açmanız gerekiyor. Yoksa kodlar çalışmaz.
 
Nasıl olmuoyor.
Peki benim bu yaptığım nedir?:cool:
Dosya ekte.:cool:
=EĞER(MOD(SATIR(A1);2)=0;1;0)
EĞER=IF
SATIR=ROW

tam da bu kodu arıyordum...

Bütün hücreler seçili iken;
Koşullu Biçimlendirme/Yeni Kural.../Kural Türü Seçin:/Biçimlendirilecek hücreleri belirlemek için formül kullan...
kısmına üstteki formülü yapıştırdım...

Önizleme:/Biçimlendir.../Dolgu kulakçığından da açık gri rengi seçtim...

tam istediğim gibi oldu... :bravo:

@Orion1'e teşekkür ederim...
 
tam da bu kodu arıyordum...

Bütün hücreler seçili iken;
Koşullu Biçimlendirme/Yeni Kural.../Kural Türü Seçin:/Biçimlendirilecek hücreleri belirlemek için formül kullan...
kısmına üstteki formülü yapıştırdım...

Önizleme:/Biçimlendir.../Dolgu kulakçığından da açık gri rengi seçtim...

tam istediğim gibi oldu... :bravo:

@Orion1'e teşekkür ederim...



Merhaba,

Bende satır renkelndirmesi yapmak istiyorum ancak; bu formülü excel 2010 sürümüne yapıştırdığımda sorunsuz çalışırken excel 2016 ya uyguladığımda hata veriyor.

Yardımcı olabilir misiniz arkadaşlar....
 
Örnek dosyanızı eklerseniz yardımcı olabiliriz.
 
Merhaba,

Bende satır renkelndirmesi yapmak istiyorum ancak; bu formülü excel 2010 sürümüne yapıştırdığımda sorunsuz çalışırken excel 2016 ya uyguladığımda hata veriyor.

Yardımcı olabilir misiniz arkadaşlar....
Merhaba.

Örnek dosya olmadığından net cevap verilemiyor.
İşlemi formül kullanarak gerçekleştirmek istiyorsanız aşağıda açıkladığım şekilde sonuç alabilirsiniz.

Koşullu biçimlendirme => formül kullan kısmında =TEKMİ(SATIR()) ve/veya =ÇİFTMİ(SATIR()) gibi bir formül de kullanılabilir.

Bu işlevleri kullanarak denemeler yaparsanız, kendiniz sonuca ulaşabilirsiniz diye düşünüyorum.
Neticede koşullu biçimlendirme işleminde kullanılan formüllerin 0/1 veya YANLIŞ/DOĞRU sonuçlarını vermesi gerekir ve
sonuç 1 veya DOĞRU olduğunda biçimlendirme gerçekleşir.
.
 
c
Merhaba.

Örnek dosya olmadığından net cevap verilemiyor.
İşlemi formül kullanarak gerçekleştirmek istiyorsanız aşağıda açıkladığım şekilde sonuç alabilirsiniz.

Koşullu biçimlendirme => formül kullan kısmında =TEKMİ(SATIR()) ve/veya =ÇİFTMİ(SATIR()) gibi bir formül de kullanılabilir.

Bu işlevleri kullanarak denemeler yaparsanız, kendiniz sonuca ulaşabilirsiniz diye düşünüyorum.
Neticede koşullu biçimlendirme işleminde kullanılan formüllerin 0/1 veya YANLIŞ/DOĞRU sonuçlarını vermesi gerekir ve
sonuç 1 veya DOĞRU olduğunda biçimlendirme gerçekleşir.
.


Merhaba,

Excel 2010 tr versiyonda aynı formül çalışırken, 2016 tr versiyonunda bu hatayı veriyor.

4595hata.jpg
 
Merhaba.

Koşullu biçimlenecek alanı (A3:K1001) seçip, dolgu rengi menüsünden DOLGU YOKu tıkladıktan sonra;
-- A sütununda veri olsa da olmasa da biçimlendirme yapılması için=> =ÇİFTMİ(SATIR())
formülünü uygulayıp renk belirleyerek işlemi onaylayın.
-- A sütununda veri varsa biçimlenme yapılsın istiyorsanız => =VE($A3<>"";ÇİFTMİ(SATIR()))
formülünü uygulayap renk belirleyerek işlemi onaylayın.
.
 
Merhaba,

Ömer bey sağ olsun nasıl yapacağınızı tarif etmiş.

Ben bir hatırlatma yapma ihtiyacı duydum.

Benim bu başlıktaki ikinci mesajda önerdiğim formül yeni kayıt girdikçe biçimlendirme yapmaktadır. Bu sebeple boş bir sayfada benim önerimi uygularsanız sonuç alamazsınız. "B" sütununa veri girdikçe satır renklendirmesi gerçekleşecektir.

Buna ek olarak Ömer beyin önerdiği;

Kod:
=TEKMİ(SATIR())
=ÇİFTMİ(SATIR())

Fonksiyonları yeni excel versiyonlarında çalışmaktadır.

Eski versiyonlar için aşağıdaki fonksiyonu kullanabilirler.

Tek satır numaralarının renklenmesi için;
Kod:
=MOD(SATIR();2)=1

Ya da;

Çift satır numaralarının renklenmesi için;
Kod:
=MOD(SATIR();2)=0
 
Sayın AYHAN'ın TEKMİ ve ÇİFTMİ işlevlerinin eski Ms.Excel versiyonlarında çalışmadığına dair hatırlatması için teşekkürler.

Soruyu soran üyenin profilinde versiyon bilgisi 2016 ve eklenen örnek belge uzantısı da ..xlsx olunca o şekilde cevap vermiştim.
.
 
Merhaba.

Koşullu biçimlenecek alanı (A3:K1001) seçip, dolgu rengi menüsünden DOLGU YOKu tıkladıktan sonra;
-- A sütununda veri olsa da olmasa da biçimlendirme yapılması için=> =ÇİFTMİ(SATIR())
formülünü uygulayıp renk belirleyerek işlemi onaylayın.
-- A sütununda veri varsa biçimlenme yapılsın istiyorsanız => =VE($A3<>"";ÇİFTMİ(SATIR()))
formülünü uygulayap renk belirleyerek işlemi onaylayın.
.


Çok teşekkür ederim... İşim çok kolaylaştı :)
 
Merhaba,

Ömer bey sağ olsun nasıl yapacağınızı tarif etmiş.

Ben bir hatırlatma yapma ihtiyacı duydum.

Benim bu başlıktaki ikinci mesajda önerdiğim formül yeni kayıt girdikçe biçimlendirme yapmaktadır. Bu sebeple boş bir sayfada benim önerimi uygularsanız sonuç alamazsınız. "B" sütununa veri girdikçe satır renklendirmesi gerçekleşecektir.

Buna ek olarak Ömer beyin önerdiği;

Kod:
=TEKMİ(SATIR())
=ÇİFTMİ(SATIR())

Fonksiyonları yeni excel versiyonlarında çalışmaktadır.

Eski versiyonlar için aşağıdaki fonksiyonu kullanabilirler.

Tek satır numaralarının renklenmesi için;
Kod:
=MOD(SATIR();2)=1

Ya da;

Çift satır numaralarının renklenmesi için;
Kod:
=MOD(SATIR();2)=0

Size de çok teşekkür ederim...
 
Yeni bu konuyla ilgili cozum ariyordum. Alternatif olsun:
Yardimci sutuna veya herhangi bir degere ihtiyac olmadan kosullu bicimlendirmede:
1-Tek satir numarali hucreleri renklendirmek icin:
Kod:
=MOD(SATIR()+1,2)<1

2-Cift satir numarali hucreleri renklendirmek icin:
Kod:
=MOD(SATIR(),2)<1

Kolay Gelsin
 
Geri
Üst