Excel'de giriş yapıldığında veya değişiklik olduğunda tarihleri otomatik olarak sıralama nasıl yapılır?

Excel'de, Sırala işlevi, ihtiyaç duyduğunuz şekilde tarihleri artan veya azalan sırada sıralamanıza yardımcı olabilir. Ancak bu dinamik değildir, eğer tarihleri sıraladıysanız ve ardından yeni bir tarih eklediyseniz, tekrar sıralamanız gerekir. Çalışma sayfasına her yeni veri girişi yaptığınızda tarihleri otomatik olarak sıralamak için iyi ve hızlı yöntemler var mı?

Tarih girildiğinde veya değiştirildiğinde formülle otomatik olarak tarih sıralama

Tarih girildiğinde veya değiştirildiğinde VBA kodu ile otomatik olarak tarih sıralama

Tarih girildiğinde veya değiştirildiğinde formülle otomatik olarak tarih sıralama

Örneğin, orijinal tarihler A Sütununda ise, aşağıdaki formül size sıralamak istediğiniz sütuna göre tarihleri veya başka metin dizilerini yeni bir yardımcı sütuna otomatik olarak sıralamanıza yardımcı olabilir. Lütfen şu adımları izleyin:

1. Bu formülü girin:

=INDEX($A$2:$A$15;MATCH(SATIR($A$2:A2);EĞER($A$2:$A$15,"<="&$A$2:$A$15);0)) tarih sütununun yanındaki boş bir hücreye, örneğin C2'ye girin ve ardından Ctrl + Shift + Enter tuşlarına birlikte basarak bir sayı dizisi elde edin. Ardından, doldurma tutamacını aşağı doğru sürükleyerek istenen hücrelere kadar genişletin. Ekran görüntüsüne bakın:

Not: Yukarıdaki formülde: A2:A15, otomatik olarak sıralamak istediğiniz orijinal tarih aralığıdır.

2. Ardından, Ana sekmesi altında Genel açılır listesinden Kısa Tarih seçerek sayıları tarih formatına getirin, ekran görüntüsüne bakın:

3. Sıra numaraları artık tarih formatına dönüştürülmüştür ve orijinal tarihler de sıralanmıştır. Ekran görüntüsüne bakın:

4. Bundan sonra, A sütununda bir tarih girdiğinizde veya değiştirdiğinizde, C sütunundaki tarihler otomatik olarak artan sırada sıralanacaktır. Ekran görüntüsüne bakın:

Tarih girildiğinde veya değiştirildiğinde VBA kodu ile otomatik olarak tarih sıralama

Aşağıdaki VBA kodu, bir tarih girdiğinizde veya değiştirdiğinizde orijinal sütundaki tarihleri otomatik olarak sıralamanıza yardımcı olabilir.

1. Tarih girdiğinizde veya değiştirdiğinizde tarihleri otomatik olarak sıralamak istediğiniz çalışma sayfasına gidin.

2. Sayfa sekmesine sağ tıklayın ve bağlam menüsünden Kodu Görüntüle'yi seçin, açılan Microsoft Visual Basic for Applications penceresinde aşağıdaki kodu kopyalayıp boş Modül penceresine yapıştırın, ekran görüntüsüne bakın:

VBA kodu: tarih girildiğinde veya değiştirildiğinde otomatik olarak sırala:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    On Error Resume Next
    If Application.Intersect(Target, Application.Columns(1)) Is Nothing Then Exit Sub
    If Target.Count > 1 Then Exit Sub
    Range("A1").Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlYes, _
                                        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

Not: Yukarıdaki kodda, girilen tarihler A sütununda otomatik olarak sıralanacaktır. İhtiyaçlarınıza göre A1 ve A2'yi kendi hücrelerinizle değiştirebilirsiniz.

3. Bundan sonra, A sütununa bir tarih girdiğinizde, tarihler otomatik olarak artan sırada sıralanacaktır.