Excel'de tarihler girildiğinde veya değiştirildiğinde otomatik olarak nasıl sıralanırlar?
Excel'de Sırala işlevi, tarihleri ihtiyacınıza göre artan ya da azalan sırada düzenlemenize yardımcı olabilir. Ancak bu işlem dinamik değildir; tarihleri sıraladıktan sonra yeni bir tarih eklerseniz, sıralamayı tekrar yapmanız gerekir. Peki veri girdiğiniz her seferde tarihleri otomatik olarak sıralayabilen hızlı ve pratik yöntemler var mıdır?
Formül ile tarih girildiğinde veya değiştirildiğinde otomatik tarih sıralama
VBA kodu ile tarih girildiğinde veya değiştirildiğinde otomatik tarih sıralama
Formül ile tarih girildiğinde veya değiştirildiğinde otomatik tarih sıralama
Örneğin, orijinal tarihler A sütununda yer alıyorsa aşağıdaki formül, sıralamak istediğiniz sütuna göre tarihleri veya diğer metin dizilerini yeni bir yardımcı sütuna otomatik olarak sıralamanıza olanak tanır. Lütfen şu adımları izleyin:
1. Şu formülü girin:
=INDEX($A$2:$A$15,MATCH(ROWS($A$2:A2),COUNTIF($A$2:$A$15,"<="&,$A$2:$A$15),0))formülünü tarih sütununuzun yanındaki boş bir hücreye (örneğin)C2) girin ve ardından bir sayı dizisi elde etmek için Ctrl + Shift + Enter tuşlarına birlikte basın. Sonrasında, istenen hücrelere kadar doldurma tutamacını aşağı doğru sürükleyin. Ekran görüntüsüne bakın:
Not: Yukarıdaki formülde: A2:A15, otomatik olarak sıralamak istediğiniz orijinal Tarih Aralığı'nızdır.
2.Ardından, sayıları Tarih formatı olarak biçimlendirmek için Kısa Tarihseçeneğini Genelaçılır listesinden Girişsekmesi altında tıklayın, ekran görüntüsüne bakın:
3. Ardışık numaralar artık tarih biçimine dönüştürüldü ve orijinal tarihler sıralandı. Ekran görüntüsüne bakın:
4. A sütununa 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:
VBA kodu ile tarih girildiğinde veya değiştirildiğinde otomatik tarih sıralama
Aşağıdaki VBA kodu, bir tarihi istediğiniz şekilde girdiğinizde veya değiştirdiğinizde orijinal sütundaki tarihleri otomatik olarak sıralamanıza yardımcı olur.
1. Tarih girildiğinde veya değiştirildiğinde tarihi 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 seçeneğini seçin. Açılan Microsoft Visual Basic for Applications penceresinde, aşağıdaki kodu boş Modül penceresine kopyalayıp yapıştırın; ekran görüntüsüne bakın:
VBA kodu: tarih girildiğinde veya değiştirildiğinde otomatik sıralama:
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. Gerekiyorsa A1 ve A2 hücrelerini kendi hücrelerinizle değiştirebilirsiniz.
3. A sütununa bir tarih girdiğinizde, tarihler bundan sonra otomatik olarak artan sırada sıralanacaktır.
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar