Şarta Göre Sıralama Yapma

  • Konuyu başlatan Konuyu başlatan emre67z
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

emre67z

Kullanıcı
Katılım
28 Tem 2022
Mesajlar
55
Merhaba,

Birim bazlı, mesleklerin son sütunda yer alan puanlarına göre yüksekten düşüğe göre sıralanmasını istiyoruz.

yardımcı olacak olan arkadaşlara şimdiden çok teşekkür ederim,
1500-1700 satırlık bir çalışma ilk 39 satırı ben kopyaladım. Her unvanı karışığındaki puana göre yüksekten düşüğe göre sıralanmasını istiyoruz.

Saygılarımla.
 
Excel VBA Donma sorunu kaydetme sorunu
Satır başına ve sonuna veri ekleme

Ekli dosyalar

Çözüm
Ömer BARAN
@emre67z

İsteği tam olarak anlamamış olabilirim.
Boşluksuz durumdaki LİSTE sayfasının bir kopyasını oluşturun ve koddaki sayfa adını aşağıdaki gibi
koddaki sayfa adı yerine doğru olarak yazın ve kodu çalıştırın.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(11 satır)
Tarihe göre sırala Oylamaya göre sırala
Aksaklık olmaz merak etmeyin.
Aralardaki BOŞLUK satırları kriter oarak kullanıldı.
Alttan üste doğru hücreler kontrol ediliyor, boş satıra gelindiğinde;
bir altındaki hücreden, daha alttaki boş satıra kadarki alan
önce G sütununa (azalan) sonra SİCİL sütununa göre (artan) sıralanıyor.
 
Oyla 0 Olumsuz oyla
Ömer BARAN' Alıntı:
Aksaklık olmaz merak etmeyin.
Aralardaki BOŞLUK satırları kriter oarak kullanıldı.
Alttan üste doğru hücreler kontrol ediliyor, boş satıra gelindiğinde;
bir altındaki hücreden, daha alttaki boş satıra kadarki alan
önce G sütununa (azalan) sonra SİCİL sütununa göre (artan) sıralanıyor.
Genişletmek için tıklayın ...
Siciller personellere özgü verilen bir numara, Onlarda değişiklik olmaması gerekli.
G sütununa (azalan) olarak sıralama yapılması yeterli bizler için.

Konu açıklamasında bahsetmedim sicil'den ancak sicil sıralamasını çağrıştıracak bir imada bulunduysam kusura bakmayın zahmet vermiş olduk.
 
Oyla 0 Olumsuz oyla
Sicilin işleme katılma nedeni, aynı grupta olup so sütun değeri eşit olanların kendi arasındaki sıralama içindir. Kullanılması şart da değil.
 
Oyla 0 Olumsuz oyla
Merhaba,

Dosyada da açıkladığım yardım talebimi,
Eski yapılan çalışmanın üzerine
ÜNVAN VE MESLEK bazlı sıralama yapılıp. Her meslekten sonra birer boşluk eklenip. Büyükten küçüğe sıralama yaptırılmasıni istiyorum.

Mevcut çalışmada ünvan ve meslek bazında sıralamayı kendim yaptırıyordum. Araya boşlukları kendim ekliyordumç Ömer bey yardımcı olmuştu boşluklar baz alınarak sıralama yapılmıştı.
 

Ekli dosyalar

Oyla 0 Olumsuz oyla
@emre67z

İsteği tam olarak anlamamış olabilirim.
Boşluksuz durumdaki LİSTE sayfasının bir kopyasını oluşturun ve koddaki sayfa adını aşağıdaki gibi
koddaki sayfa adı yerine doğru olarak yazın ve kodu çalıştırın.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(25 satır)
 
Oyla 0 Olumsuz oyla
Çözüm
Ömer BARAN' Alıntı:
@emre67z

İsteği tam olarak anlamamış olabilirim.
Boşluksuz durumdaki LİSTE sayfasının bir kopyasını oluşturun ve koddaki sayfa adını aşağıdaki gibi
koddaki sayfa adı yerine doğru olarak yazın ve kodu çalıştırın.

VBA: 
İndirmek için giriş yapmanız gerekmektedir.
(16 satır)
Genişletmek için tıklayın ...
Ömer bey merhaba,

yardımınız için teşekkür ederim. Kodu örnek dosyada çalıştırdım ancak gerçekte kullandığım dosyada puan sıralamasını yapmıyor. Sebebini anlama adına soruyorum.

Application.ScreenUpdating = True: Application.Calculation = xlCalculationAutomatic sıralama için yazılan satır diğer satırlar unvan ve meslek sıralaması ve boşluk bırakmak için düzenlenen satırlar.
 
Oyla 0 Olumsuz oyla
@emre67z
İlgili kod satırının anlamı tam öyle değil.
Sayfayı yenileyerek önceki cevabımdaki kodu tekrar kontrol edip yenisini kullanın.

-- Her kod satırının üstüne, altındaki satırın ne iş yaptığına dair not eklendi.
Kodu açıklamalarla beraber VBA ekranına yapıştırın (açıklama satırları kodun işleyişine mani olmaz.)
-- Sıralama için 3'üncü kriter olarak G sütununun kullanılması sağlandı.
 
Oyla 0 Olumsuz oyla
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Benzer Konular Popüler İçerikler Daha Fazlası
Geri
Üst Alt