Tarihi otomatik sıralama

[ismail-34]

Selamlar hocalarım a sütununda karışık tarihli girişler yapıyorum.nitekim faturaların makbuzların ne zaman geleceği belli olmuyor.

tüm satırları tarayıp her seferinde kontrol edip eskiden yeni ye sıralayan bir makro varmıydı

dosyam linktedir

tarihleri otomatik sıralama.xlsm

drive.google.com

saygılar sevgiler

 

[relaxim]

Merhabalar,
Makro kaydet yöntemiyle sıralama yaptığınız işlemi kaydedip bir tuşa atayabilirsiniz. Yada sayfanın girildiğinde, değiştiğinde olaylarına yazabilirsiniz.
Saygılar....

 

[Merhum İdris SERDAR]

.

Şöyle bir kod olabilir.

Sub sirala()
Range("A2", Range("A2").End(xlDown)).Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlNo
End Sub

.

 

[assenucler]

Sıralama önce B2, sonra A2 sütuna göre olduğunda, kod nasıl olmalıdır?

 

[Merhum İdris SERDAR]

.
Şöyle olabilir.

Sub sirala()

    Range("B2", Range("B2").End(xlDown)).Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlNo
    Range("A2", Range("A2").End(xlDown)).Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlNo
      
End Sub

.

 

[assenucler]

Sayın İdris SERDAR,

İlgi ve yardımınız teşekkürler.
Saygılar
Selim

 

[ismail-34]

.

Şöyle bir kod olabilir.

Sub sirala()
Range("A2", Range("A2").End(xlDown)).Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlNo
End Sub

.

hocam teşekkürler a sütunu için çalışıyor ancak ona bağlı yanındaki satırlarıda sıralamasınıda istiyorum m sütununa kadar mesela.

saygılar.

 

[ismail-34]

Merhabalar,
Makro kaydet yöntemiyle sıralama yaptığınız işlemi kaydedip bir tuşa atayabilirsiniz. Yada sayfanın girildiğinde, değiştiğinde olaylarına yazabilirsiniz.
Saygılar....

teşekkürler idris hocamda hemen koymuş sağolsun.