3 Alana Göre Otomatik Sıralama Yapmak

3 Alana Göre Otomatik Sıralama Yapmak

  • Konuyu başlatan Konuyu başlatan merakli
  • Başlangıç tarihi Başlangıç tarihi

merakli

Kullanıcı
Katılım
28 Tem 2022
Mesajlar
748
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Örnek dosyada ve görselde anlatıldığı gibi 3 sütuna göre sıralama yapmak ve tarihlere göre renklendirmek istiyorum bunu nasıl yapabilirim?



soru.webp
 
CTRL F Bulma ve Değiştirme
CTRL F Bulma ve Değiştirme
Koşullu Biçimlendirme Uygulamasını Diğer Sayfalara Uygulama

Ekli dosyalar

Tarihe göre sırala Oylamaya göre sırala
Merhaba @merakli .

Sıralama için aşağıdaki kodu dener misiniz?
kODU, Veriler karışık durumdayken ve ilgili sayfa aktifken çalıştırın.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(1 satır)
 
Oyla 0 Olumsuz oyla
Tabii ki, örneğin SIRALA ismini kullanarak bir prosedür oluşturup içine bu kod satırını yapıştırın.
Halledersiniz diye düşünerek Sub...End Sub arasına almadan göndermiştim.

.
 
Oyla 0 Olumsuz oyla
Ömer BARAN' Alıntı:
Tabii ki, örneğin SIRALA ismini kullanarak bir prosedür oluşturup içine bu kod satırını yapıştırın.
Halledersiniz diye düşünerek Sub...End Sub arasına almadan göndermiştim.

.
Genişletmek için tıklayın ...
Bende acaba başka bir kullanımı mı var diye tereddüt ettim.
Evet dediğiniz gibi yaptım sorun yok yani istenilen sonucu veriyor gibi

Formülde merak ettiğim

, , 1

bu virgüller ve bir rakamı neyi ifade ediyor?

Bunun dışında formülde ilk G sonra A en son B sütunu için formül yazmışsınız.
Oysa ben bu işlemi el ile özel sıralamadan yaparken tam tersi önce B sonra A en son G sütununa göre özel sıralatıyordum.
Burada ise tam tersi yazılmış formül tersten mi sıralamaya başlıyor
 
Oyla 0 Olumsuz oyla
1 ARTAN anlamında, 2 yaparsanız AZALAN olarak sıralanır.
ALAN.Sort 1'incil KRİTER, ARTAN/AZALAN TERCİHİ, 2'ncil KRİTER, , ARTAN/AZALAN TERCİHİ, 3'üncül KRİTER, ARTAN/AZALAN TERCİHİ
 
Oyla 0 Olumsuz oyla
VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(3 satır)

Soru örneğini hazırlarken belirtmediğim bir durumu farkettim.
Bu 365 veri her gün 60-70 veri arasında girilerek 5 günde oluşuyor.
hepsi aynı anda topluca cuma günü yer alıyor...
Böyle olunca 365. satır yazmak yerine dolu olan en son satır diye revize edilebilir mi?
 
Oyla 0 Olumsuz oyla
Bir önceki mesajınızın son kısmını geç fark ettim.

Alan, kodda belirtilen sırayla sıralamaya tabi tutuluyor.
-- TARİHE göre sırala,
-- Aynı tarihlileri SINIFa göre sırala,
-- Aynı tarih ve sınıf olanları SAATe göre sırala.

İşlem tam olarak, koddaki sırayla yapılıyor.
EKlediğiniz örnek belgedeki durumdan ben böyle anladım.

Son mesajınıza gelince, kodu aşağıdaki şekilde değiştirin.

CSS: 
İndirmek için giriş yapmanız gerekmektedir.
(2 satır)

.
 
Oyla 0 Olumsuz oyla
Hata verdi ama belki benden kaynaklı olabilir.
End(3).Row
genelde son satırı bulmak için End(xlUp).Row kullanılmış siz End(3).Row yazmışsınız bu 3 neyi temsil ediyor
 

Ekli dosyalar

  • Screenshot_2.webp
    Screenshot_2.webp
    4.6 KB · Görüntüleme: 43
Oyla 0 Olumsuz oyla
xlUP anlamındadır. O kısımda sorun yok.
Kodun son kısmında "B1:B" & son olacaktı o kısım hatalı olmuş (kodu düzelttim).
 
Oyla 0 Olumsuz oyla
Bence bir sürü renk kodu yerine, H1, H2 ve H3'ü elle renklendirin.
Alanın bu renk sıra ve ritmine göre renklendirilmesini de içerecek şekilde kodu aşağıdaki gibi kullanın.
Kullanım açısından pratik de olur. Renk değişikliklerini kolaylıkla yapabilirsiniz.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(10 satır)
 
Oyla 0 Olumsuz oyla
Kodu denedim örnekte benim eklediğim renkleri kaldırdı ancak herhangi bir renklendirme olmadı tümü sanki beyaz renk oldu gibi
Cahilliğime verin "Bence bir sürü renk kodu yerine, H1, H2 ve H3'ü elle renklendirin" açıklamanızı anlayamadım
 
Oyla 0 Olumsuz oyla
H1'den başlayarak H1, H2, H3'e (3 renk düşünüyorsanız 3 hücreye) elle arkaplan rengi uygulamışsanız,
kod sorunsuz bu 3 renge göre ve buradaki sırayla alanı, tarih deişimlerine göre renklendirir.

Diyelim elle renklendirerek, H1'den aşağı doğru 10 satırlık renk düzeni (renk paleti gibi) oluşturdunuz.
O zaman, koddaki If say = 3 Then say = 0 satırında yer alan 3 sayısını 10 yapmanız yeterli olur.

.
 
Oyla 0 Olumsuz oyla
Teşekkür ederim
Ömer BARAN' Alıntı:
H1'den başlayarak H1, H2, H3'e (3 renk düşünüyorsanız 3 hücreye) elle arkaplan rengi uygulamışsanız,
kod sorunsuz bu 3 renge göre ve buradaki sırayla alanı, tarih deişimlerine göre renklendirir.

Diyelim elle renklendirerek, H1'den aşağı doğru 10 satırlık renk düzeni (renk paleti gibi) oluşturdunuz.
O zaman, koddaki If say = 3 Then say = 0 satırında yer alan 3 sayısını 10 yapmanız yeterli olur.

.
Genişletmek için tıklayın ...
 
Oyla 0 Olumsuz oyla
Yanıt için giriş yapmanız veya üye olmanız gerekir.
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt