3 Alana Göre Otomatik Sıralama Yapmak

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

Kısa Açıklama

3 Alana Göre Otomatik Sıralama Yapmak isimli başlıkta, ilgili işlemlere dair detaylar yer almaktadır.
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Ekli dosyalar
Moderatörün son düzenlenenleri:
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.

.
 
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.

.
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
 
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İ
 
VBA:
Görüntülemek 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?
 
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:
Görüntülemek için giriş yapmanız gerekmektedir.
(2 satır)

.
 
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: 5
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:
Görüntülemek için giriş yapmanız gerekmektedir.
(10 satır)
 
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
 
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.

.
 
Teşekkür ederim
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.

.
 
Geri
Üst