Excel'de aynı filtreyi birden fazla çalışma sayfasına nasıl uygularsınız?

Bir çalışma sayfasında Filtre işlevini kullanarak verileri filtrelemek bizim için kolay olabilir, ancak bazen aynı filtre kriterlerine sahip ortak veri biçimlendirmesine sahip birden fazla çalışma sayfasında filtreleme yapmanız gerekebilir. Her birini tek tek filtrelemek çok zaman kaybettirir; burada, bu sorunu tek seferde çözmek için kolay bir yol sunabilirim.

VBA kodu ile aynı filtreyi birden fazla çalışma sayfasına uygulayın

VBA kodu ile aynı filtreyi birden fazla çalışma sayfasına uygulayın

Örneğin, aşağıdaki ekran görüntüsünde gösterildiği gibi, aynı kriterle (Product = KTE) filtrelenmesi gereken dört çalışma sayfam var.

Excel'de birden fazla çalışma sayfasında verileri doğrudan filtrelemenin bir yolu yoktur, ancak aşağıdaki VBA kodu bu işi tamamlamanıza yardımcı olabilir, lütfen şu adımları izleyin:

1. ALT + F11 tuşlarına basılı tutun, ardından Microsoft Visual Basic for Applications penceresi açılır.

2. Ekle > Modül'e tıklayın ve ardından aşağıdaki kodu Modül Penceresine yapıştırın.

VBA kodu: Aynı filtreyi birden fazla çalışma sayfasına uygula:

Sub apply_autofilter_across_worksheets()
'Updateby Extendoffice
    Dim xWs As Worksheet
    On Error Resume Next
    For Each xWs In Worksheets
        xWs.Range("A1").AutoFilter 1, "=KTE"
    Next
End Sub

3. Ardından F5 tuşuna basarak kodu çalıştırın; tüm çalışma sayfalarında KTE ürünleri tek seferde filtrelenmiş olacaktır, ekran görüntüsüne bakın:

Not: Yukarıdaki kodda, xWs.Range("A1").AutoFilter1, "=KTE" satırında, A1 ve =KTE, filtrelemek istediğiniz sütunu ve kriteri belirtir;1 ise filtreleme yaptığınız sütun numarasıdır, ihtiyacınıza göre bunları değiştirebilirsiniz. Örneğin, siparişleri50'den büyük olanları filtrelemek istiyorsanız, bu satırı şu şekilde düzenlemeniz yeterlidir: xWs.Range("B1").AutoFilter2, ">50".