Sıralama

[Sayho]

Merhaba ,
Öncelikle link vermek istiyorum , böylece ne üstüne konuştuğum daha rahat anlaşılabilir :https://i.hizliresim.com/4M0dqQ.jpg?
Şimdi B kolonunda görmüş olduğunuz ( içinde yazıda bulunduran ) kısımda geçen değerlere E kolonunda sıralama yapmak istiyorum . Ama eğer 155.3 iki defa geçiyorsa ikinci seferde E kolonunda 2 yazacak , bir tane daha varsa 3 yazacak ve böylece devam ederek gidecek. Ve yeni bir sayıya geçtiği zaman
( sıradaki rakam 155.6 diyelim ) tekrardan 1 den başlayıp yeniden bütün sıralama işlemini yapacak. Böylece bütün B kolonunu E de sıraya koymuş olacağım .

 

[Asri]

155.5 için 11 defa yazıldığı için bir tane sonuç ve karşısında 11 olması gerekmezmi.

Bu örnek de her 155.5 in karşısında farklı sonuçlar.

Amacınız B kolonunu sıralamak ise direkt neden sıralamıyorsunuz.
Her bir rakamın tekrar sayısına göre mi sıralamak istiyorsunuz.

Örneğinizi örnek bir dosya ile detaylandırabilir misiniz?

dosya.tc yada dosya.co dan dosya yükleyebilir siniz.

 

[Korhan Ayhan]

Deneyiniz.

E2 hücresine,

=EĞERSAY($B$2:$B2;$B2)

 

[Sayho]

Deneyiniz.

E2 hücresine,

=EĞERSAY($B$2:$B2;$B2)

Kodu kullandım ama başarılı olamadım. @asri arkadaşımızın dediği gibi dosyayı bir siteye yüklemeye karar verdim bende .

excelforum.xls - 1.7 MB

Yeni rakam gördüğümde elle 1 yazıyordum , tekrar edenlerde aşağı doğru ( +) tuşunu indiriyordum. Arada bir ya da 2 tane kaçırmış olabilirim. Ama ne yapmak istediğim tam olarak anlaşılmıştır sanırım.

 

[Asri]

Kodu kullandım ama başarılı olamadım. @asri arkadaşımızın dediği gibi dosyayı bir siteye yüklemeye karar verdim bende .

excelforum.xls - 1.7 MB

Yeni rakam gördüğümde elle 1 yazıyordum , tekrar edenlerde aşağı doğru ( +) tuşunu indiriyordum. Arada bir ya da 2 tane kaçırmış olabilirim. Ama ne yapmak istediğim tam olarak anlaşılmıştır sanırım.

Bu sıralamayı hangi kurala göre yapıyorsunuz. Şunu detaylı bir şekilde açıklarmsınız.

* ilk 3 karaktere göre bakıyorum 001 lerin hepsin eşit sayı olmalı
* 001 BIL e göre bakıyorum 2 çıkması lazım , birinde 4 , birinde 5 çıkmış.

Bu sıralamanın kuralını yazmanız gerekiyor.

Demirbaş Numarası Tasnif Numarası Sıra
107073 741.2 ULU 2012 1
42421 001 AÇI 1988 1
46251 001 ALA 1991 2
70107 001 AVC 1999 3
80723 001 BIL 2008 4
80724 001 BIL 2008 5
24485 001 CON 1962 6
88355 001 DEN 2011 7

 

[Asri]

001 den 001.01 e geçince sıralama yeniden başlıyor.
001 SHL 2006 17
001 WES 1987 18
001.01 BİL 1996 1
001.01 POI 1998 2

001.01 den 001.024677 ye geçince sıralama yeniden başlamıyor.
80043 001.01 POI 2001 3
74508 001.01 ŞAT 2001 4
61294 001.024677 GÜR 2000 5
41542 001.09 POI 1986 6


001.01 den 001.09561 ve 001.1 e geçince sıralama yeniden başlamıyor.
12283 001.09561 ADI 1943 7
84602 001.1 ALA 1991 8

NEDEN?

 

[Sayho]

Bu sıralamayı hangi kurala göre yapıyorsunuz. Şunu detaylı bir şekilde açıklarmsınız.

* ilk 3 karaktere göre bakıyorum 001 lerin hepsin eşit sayı olmalı
* 001 BIL e göre bakıyorum 2 çıkması lazım , birinde 4 , birinde 5 çıkmış.

Bu sıralamanın kuralını yazmanız gerekiyor.

Demirbaş Numarası Tasnif Numarası Sıra
107073 741.2 ULU 2012 1
42421 001 AÇI 1988 1
46251 001 ALA 1991 2
70107 001 AVC 1999 3
80723 001 BIL 2008 4
80724 001 BIL 2008 5
24485 001 CON 1962 6
88355 001 DEN 2011 7

Bunlar dewey onluk sıralama sistemine göre kullanılmış eski kütüphane demirbaş listesi. Baştaki demirbaş aynı zamanda barkod numarası . Onunla bu sıralamada işimiz yok. Tasnif numarası kitabın etiket numarası , attığım dosyada 001 ile başlayan 18 tane numara var. Arkasından gelen harfler o kitapların alfabetik sırası. 001 ile başlayan 18 tane kitap var ama hangisinin bu alfabetik sıra içinde kaçıncı kitap olduğunu tasnif sırasında hızlıca bulamıyorsunuz. Bu sayede sadece demirbaş numarasına bakarak bu kitabın o tasnif içinde kaçıncı kitap olduğunu bulmak işinizi kolaylaştırıyor. Bu sayede tasnif ya da sayım yaparken kullanıcı hız kazanacak. Normalde elle giriyorum ama 200 ' lere gelmem işimden dolayı 2 günümü aldı.

001 den 001.01 e geçince sıralama yeniden başlıyor.
001 SHL 2006 17
001 WES 1987 18
001.01 BİL 1996 1
001.01 POI 1998 2

001.01 den 001.024677 ye geçince sıralama yeniden başlamıyor.
80043 001.01 POI 2001 3
74508 001.01 ŞAT 2001 4
61294 001.024677 GÜR 2000 5
41542 001.09 POI 1986 6


001.01 den 001.09561 ve 001.1 e geçince sıralama yeniden başlamıyor.
12283 001.09561 ADI 1943 7
84602 001.1 ALA 1991 8

NEDEN?

Çok iyi yakalamışsınız. Normalde geçmesi gerekiyor. Sayenizde düzelttim . ^_^

 

[Asri]

Aşağıdaki şekilde deneyiniz.


http://dosya.co/tw4kdzrpkx5b/excelforum.xls.html

Sub sirala()
   Application.ScreenUpdating = False
   Application.DisplayAlerts = False

   sonsatir = Cells(Rows.Count, "B").End(3).Row
   say = 0
   For i = 2 To sonsatir
     veri = Trim(Cells(i, "B").Value)
     If InStr(veri, " ") = 0 Then veri = veri & " "
     kod = Left(veri, InStr(veri, " ") - 1)
     If i = 2 Then eskikod = kod

     If eskikod = kod Then
       say = say + 1
       Cells(i, "C").Value = say
     Else
       say = 0
       say = say + 1
       Cells(i, "C").Value = say
     End If
     
     eskikod = kod
   Next i

   Application.ScreenUpdating = True
   Application.DisplayAlerts = True
   MsgBox ("Sıralama işlemi tamamlandı")
End Sub

 

[Sayho]

Aşağıdaki şekilde deneyiniz.


http://dosya.co/tw4kdzrpkx5b/excelforum.xls.html

Sub sirala()
   Application.ScreenUpdating = False
   Application.DisplayAlerts = False

   sonsatir = Cells(Rows.Count, "B").End(3).Row
   say = 0
   For i = 2 To sonsatir
     veri = Trim(Cells(i, "B").Value)
     If InStr(veri, " ") = 0 Then veri = veri & " "
     kod = Left(veri, InStr(veri, " ") - 1)
     If i = 2 Then eskikod = kod

     If eskikod = kod Then
       say = say + 1
       Cells(i, "C").Value = say
     Else
       say = 0
       say = say + 1
       Cells(i, "C").Value = say
     End If
     
     eskikod = kod
   Next i

   Application.ScreenUpdating = True
   Application.DisplayAlerts = True
   MsgBox ("Sıralama işlemi tamamlandı")
End Sub

Çok ama çook teşekkür ederim.