Excel'de birden çok sayfaya aynı filtre nasıl uygulanır?
Bir çalışma sayfasındaki verileri filtrelemek için Filtre işlevini uygulamak bizim için kolay olabilir, ancak bazen, aynı filtre kriterlerine sahip ortak veri biçimlendirmesine sahip birden çok çalışma sayfasına filtre uygulamanız gerekebilir. Bunları tek tek filtrelemek çok zaman kaybedecektir, burada, bunu bir kerede çözmenin kolay bir yolunu sunabilirim.
Aynı filtreyi VBA kodu ile birden çok çalışma sayfasına uygulayın
Aynı filtreyi VBA kodu ile birden çok çalışma sayfasına uygulayın
Örneğin, aşağıdaki ekran görüntüsünün aynı anda Ürün = KTE ile aynı kriterlere göre filtrelenmesi gerektiğinden dört çalışma sayfam var.
Excel'de birden çok sayfadaki verileri filtrelemenin doğrudan bir yolu yoktur, ancak aşağıdaki VBA kodu bu işi bitirmenize yardımcı olabilir, lütfen aşağıdaki işlemleri gerçekleştirin:
1. Basılı tutun ALT + F11 anahtarlar, ardından açılır Uygulamalar için Microsoft Visual Basic pencere.
2. tıklayın Ekle > modülve aşağıdaki kodu modül Pencere.
VBA kodu: Aynı filtreyi birden çok çalışma sayfasına uygulayın:
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. Ve sonra tuşuna basın. F5 Bu kodu çalıştırmak için anahtar, KTE'nin tüm ürünleri bir kerede tüm çalışma sayfalarında filtrelenmiştir, ekran görüntüsüne bakın:
not: Yukarıdaki kod içinde, bunun içinde xWs.Range ("A1"). Otomatik Filtre 1, "= KTE" senaryo, A1 ve = KTE Filtrelemek istediğiniz kolon ve kriterleri belirtir, 1 rakamı filtrelediğiniz kolon numarasıdır, ihtiyacınıza göre değiştirebilirsiniz. Örneğin, 50'den büyük sıralamayı filtrelemek istiyorsanız, bu komut dosyasını şu şekilde değiştirmeniz yeterlidir: xWs.Range ("B1"). Otomatik Filtre 2, "> 50".
Verileri, metin uzunluğu, büyük / küçük harfe duyarlı vb. Gibi birden çok kritere veya diğer belirli koşullara göre filtreleyin. Kutools for Excel'S Süper Filtre özellik güçlü bir yardımcı programdır, aşağıdaki işlemleri bitirmek için bu özelliği uygulayabilirsiniz:
Kutools for Excel: 300'den fazla kullanışlı Excel eklentisi ile 30 günde sınırlama olmaksızın ücretsiz deneyin. Hemen indirin ve ücretsiz deneme! |
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!