Excel'de tarihe göre sütunları otomatik olarak gizlemek nasıl yapılır?

Diyelim ki, bir çalışma sayfasında bir dizi verim var ve şimdi belirli bir tarihe göre sütunları otomatik olarak gizlemek istiyorum. Örneğin, bir hücreye 16/5/2016 tarihini girdiğimde, aşağıdaki ekran görüntüsünde gösterildiği gibi bu belirli tarihten küçük olan tarihleri içeren sütunları hemen gizlemek istiyorum. Bu makale, bunu çözmek için bazı ipuçlarını tanıtacaktır.

VBA kodu ile belirli bir tarihe göre sütunları otomatik olarak gizleme

Kutools for Excel ile belirli bir tarihe göre sütunları gizleme

VBA kodu ile belirli bir tarihe göre sütunları otomatik olarak gizleme

Bu görevi tamamlamak için aşağıdaki VBA kodu size yardımcı olabilir, lütfen şu adımları izleyin:

1. Tarihe göre gizlemek istediğiniz sayfa sekmesini seçin ve sağ tıklayarak içerik menüsünden Kodu Görüntüle'yi seçerek Microsoft Visual Basic for Applications penceresine gidin, ardından aşağıdaki kodu Modül'e kopyalayıp yapıştırın:

VBA kodu: Belirli bir tarihe göre sütunları otomatik olarak gizleme:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    Dim xCell As Range
    If Target.Address <> Range("K4").Address Then Exit Sub
    Application.ScreenUpdating = False
    For Each xCell In Range("A1:I1")
        xCell.EntireColumn.Hidden = (xCell.Value < Target.Value)
    Next
    Application.ScreenUpdating = True
End Sub

2. Ardından bu kodu kaydedip kapatın, çalışma sayfasına geri dönün ve şimdi K4 hücresine bir tarih girdiğinizde, belirtilen tarihten önceki tarihleri içeren sütunlar otomatik olarak gizlenecektir.

Not: Yukarıdaki kodda, K4, sütunları gizlemek istediğiniz belirli tarih hücresidir; A1:I1 ise kullandığınız tarihleri içeren satır hücreleridir.

Kutools for Excel ile belirli bir tarihe göre sütunları gizleme

Eğer kodla ilgili deneyiminiz yoksa, burada kullanışlı bir araç var - Kutools for Excel, Belirli Hücreleri Seç özelliğiyle bu işi kolayca tamamlayabilirsiniz.

Kutools for Excel'i yükledikten sonra lütfen şu adımları izleyin:

1. Tarih başlıklarını seçin ve Kutools > Seç > Belirli Hücreleri Seç'e tıklayın, ekran görüntüsüne bakın:

2. Açılan Belirli Hücreleri Seç iletişim kutusunda, Seçim türünden Tüm Sütun'u seçin ve ardından Belirli tür açılır listesinden Küçüktür gibi bir kriter seçin ve gizlemek istediğiniz tarihi yanındaki metin kutusuna girin, ekran görüntüsüne bakın:

3. Ardından Tamam düğmesine tıklayın, 16/5/2016'dan küçük olan tarihleri içeren belirli sütunlar hemen seçilir, ekran görüntüsüne bakın:

4. Ardından herhangi bir seçili sütun başlığına sağ tıklayın ve bu seçili sütunları gizlemek için Gizle'yi seçin. Ekran görüntüsüne bakın: