excel tek ve çift rakamları renklendirme

[eyyup27]

arkadaşlar iyi geceler
benim bir problemim var, yardımcı olabilirseniz sevinirim.
excel tablom var.
sütun sayısı 7
satır sayısı 20.000
bu satırlardaki tek sayıları aynı renk ; çift sayıları aynı renk ile renklendirmek istiyorum.
formül ile nasıl yapabilirim ? yardımlarınız için şimdiden teşekkür ederim.

 

[klop01]

İyi geceler.
Koşullu biçimlendirmedeki formül bölümünden yapılabilir.
Tablonuzun A1:G20000 aralığında olduğu kabul edilerek:
Biçimlendirilecek alanı seçiniz.
=TEKMİ(A1) formülü ile tek olan sayıları
=ÇİFTMİ(A1) formülü ile çift olan sayıları

 

[Seyit Tiken]

Görselde ki gibi çalışmanıza uyarlayınız.

 

[eyyup27]

İyi geceler.
Koşullu biçimlendirmedeki formül bölümünden yapılabilir.
Tablonuzun A1:G20000 aralığında olduğu kabul edilerek:
Biçimlendirilecek alanı seçiniz.
=TEKMİ(A1) formülü ile tek olan sayıları
=ÇİFTMİ(A1) formülü ile çift olan sayıları

OLMADI AMA

 

[klop01]

Aşağıdaki gibi olmalı, kontrol edin.

 

[Korhan Ayhan]

Profilinizdeki excel sürümü nedir?

 

[Hepgel]

Merhaba @eyyup27

Tek çift sayılar için

7 sütunluk aralığı seçip
Koşullu biçimlendirme Yeni Kural Formül Kullan bölümüne

Çift sayılar için

=Mod(A1;2)=0

Tek sayılar için

=Mod(A1;2)=1

Formüllerini yazdıktan sonra renk seçiminizi yapın.

 

[eyyup27]

Görselde ki gibi çalışmanıza uyarlayınız.
Ekli dosyayı görüntüle 217736

ÇOK TEŞEKKÜR EDERİM.

 

[eyyup27]

İyi geceler.
Koşullu biçimlendirmedeki formül bölümünden yapılabilir.
Tablonuzun A1:G20000 aralığında olduğu kabul edilerek:
Biçimlendirilecek alanı seçiniz.
=TEKMİ(A1) formülü ile tek olan sayıları
=ÇİFTMİ(A1) formülü ile çift olan sayıları

ÇOK TEŞEKKÜR EDERİM.

 

[Korhan Ayhan]

Profilinizdeki Excel sürüm bilgisini lütfen güncelleyiniz.

 

[canburak]

Merhabalar,
Renkli bicimlendirmeyi bir kosula gore yapmaya calistim ama olmuyor, B sutunumda sayilar var ona gore kosulum B sutunda sayi Tekli ise bicimdeki rengi o hucrenin bulundugu A ile H sutunu arasindaki tum satiri renklendirmesini istiyorum, hucresel oldu ama kosulun dogrulandigi tum satiri renklendiremedim.

Simdiden yardimlariniz icin Tesekkurler.

 

[ÖmerFaruk]

Satırın tamamına uygulanmak üzere
=Tekmi($A2) şeklinde formülü yaparsanız o satırdaki tüm hücreler A harfinin solundaki $ işaretten dolayı sadece A sütununa bakacaktır.

 

[canburak]

Sagol ustad bu sekilde oldu ama her seferinde tekrar ayni islemleri yapiyorum, bunu makro ile nasil yapabilirim acaba?

 

[ÖmerFaruk]

Kendinize uyarlayabilirisniz.

Sub Renklendir()
Dim hcr As Range
For Each hcr In Range("A5:A31")
    If WorksheetFunction.IsOdd(hcr.Value) Then
        Range("A" & hcr.Row, "I" & hcr.Row).Interior.Color = vbBlue
    Else
        Range("A" & hcr.Row, "I" & hcr.Row).Interior.Color = vbYellow
    End If
Next hcr
End Sub

 

[canburak]

Elinize saglik Ustad, Assagidaki hatayi veriyor ve buarada A31 hucresi sabit degil liste degisken artabilir sadece A5 hucresi sabit

 

[ÖmerFaruk]

Şu şekilde kullanın.

Sub Renklendir()
Dim hcr As Range
Son = Range("A5").End(xlDown).Row
For Each hcr In Range("A5:A" & Son)
    If hcr / 2 = Int(hcr / 2) Then
        Range("A" & hcr.Row, "I" & hcr.Row).Interior.Color = vbBlue
        'dilerseniz rengi değiştirirsiniz'
    Else
        Range("A" & hcr.Row, "I" & hcr.Row).Interior.Color = vbYellow
        'dilerseniz rengi değiştirirsiniz'
    End If
Next hcr
End Sub

 

[canburak]

Elinize Saglik Ustad Cok guzel oldu calisiyor.

Saygilar,

 

[Korhan Ayhan]

Lütfen profilinizde yazan aşağıdaki ifadeyi kullandığınız ofis sürümü bilgisi ile güncelleyiniz.

Excel Vers. ve Dili turkce

 

[canburak]

Şu şekilde kullanın.

Sub Renklendir()
Dim hcr As Range
Son = Range("A5").End(xlDown).Row
For Each hcr In Range("A5:A" & Son)
    If hcr / 2 = Int(hcr / 2) Then
        Range("A" & hcr.Row, "I" & hcr.Row).Interior.Color = vbBlue
        'dilerseniz rengi değiştirirsiniz'
    Else
        Range("A" & hcr.Row, "I" & hcr.Row).Interior.Color = vbYellow
        'dilerseniz rengi değiştirirsiniz'
    End If
Next hcr
End Sub

Tekrar Merhabalar Hocam,
Onceden yaptigimiz formuller B sutunundan A'dan Z'ye gore siraladigimda duzgun calisiyor lakin simdi siralamayi 2 ye cikardigim icin, birinci siralama E sutununa gore ve ikinci siralama B sutununa gore aliyorum ama renkler uyusmuyor , assagidaki tablodaki gibi Renkleri B sutunundaki rakamlara gore getirmek gerekiyor, suan icin renkleri ornek olsun diye el ile yerlestirdim , eger mumkun ise assagidaki gibi yapabilirmiyiz yukaridaki makrolarla ? birinci rengi "1017" ardindan gelen rakama ikinci rengi "1015" gibi devam etmesi gerekiyor.

Saygilarimla,

 

[ÖmerFaruk]

Tablonuzun en sağında bir yardımcı sütun ilave ederseniz Koşullu biçimlendirme ile kolaylıkla yapabilirsiniz.

Örneğin K sütunu olsun
K5 hücresine 1 girin
K6 hücresine şu formülü girin
=EĞER(VE(B6=B5;E6=E5);F5;F5+1)

Başlık satırınınz hariç Tüm tablonuzu mouse ile seçin ve koşullu biçim uygulayın
Koşullu biçim / formül kısmına aşağıdkai formülü kullanın ve biçim için kullanacağınız rengi belirleyin.
=MOD($K5;2)=0

İkinci rengi isterseniz sabit olarak verebileceğiniz gibi koşullu biçim ile de verebilirsiniz
Koşullu biçimle vermek isterseniz koşullu biçim / formül kısmına aşağıdkai formülü kullanın ve biçim için kullanacağınız rengi belirleyin.
=MOD($K5;2)=1

Örnek dosya ektedir. Sayfa1 de ve Sayfa2 de benzer 2 örnek vardır.