Birlikte çalışırken Microsoft Excel Verileri filtrelemek, yalnızca istediğimiz bilgileri görmemizi sağlar. Büyük bir veri kümesindeki veya tablolardaki belirli öğelere odaklanmak istediğimizde, bu teknik kullanışlı olur. İşimiz bittiğinde, bu verileri elektronik tablomuza geri koymamız gerekir. Excel bunun için zaten yerleşik bir araç var. VBA Excel'de herhangi bir görevi gerçekleştirmenin en verimli, zaman kazandıran ve güvenli yoludur. Bu makalede, Excel VBA'da filtreyi kaldırmak için bazı örnekler vereceğiz.

Alıştırma Çalışma Kitabını İndirin

Çalışma kitabını indirebilir ve onlarla pratik yapabilirsiniz.

Excel VBA'da Filtre Kaldırmak için 5 Basit Yöntem

Excel, verilerden filtreleri kaldırmak için yerleşik araçlara ve işlevlere sahiptir. Excel VBA çalıştırarak bu filtreleri hızlı bir şekilde kaldırabiliriz. VBA Verilerden filtreleri kaldırmak için aşağıdaki veri kümesini kullanacağız. Veri kümesi, sütunda bazı ürün kimliklerini içerir B , sütundaki ürün adları C ve sütundaki teslimat ülkesi D Ürünün sadece detaylarını görmek istediğimiz için Şampuan ve Saç kremi Şimdi, bu filtrelenmiş verileri temizlememiz gerektiğini varsayalım. Excel VBA Makroları Bu filtreleri verilerden temizlemek için şu örnekleri gösterelim Excel VBA .

1. Excel Tablosundan Tüm Filtreleri Kaldırmak için VBA Uygulayın

ile Excel VBA 'yi kullanmak için, kullanıcılar şeritten excel menüleri gibi davranan kodu kolayca kullanabilirler. VBA kodunu kullanarak Excel tablosundan tüm filtreleri kaldırmak için aşağıdaki adımları takip edelim.

ADIMLAR:

• İlk olarak, şu adrese gidin Geliştirici şeridinden sekmesini seçin.
• İkinci olarak Kod kategorisinde, üzerine tıklayın Visual Basic açmak için Visual Basic Düzenleyicisi . veya basın Alt + F11 açmak için Visual Basic Düzenleyicisi .

• Bunu yapmak yerine, çalışma sayfanıza sağ tıklayıp Kodu Görüntüle Bu da sizi şu adrese götürecektir Visual Basic Düzenleyicisi .

• Bu, şu adreste görünecektir Visual Basic Düzenleyicisi aralıktan bir tablo oluşturmak için kodlarımızı yazdığımız yer.
• Üçüncü olarak Modül bir şey yok. Ekleme açılır menü çubuğu.

• Bu, bir Modül çalışma kitabınızda.
• Ve, kopyalayıp yapıştırın VBA kodu aşağıda gösterilmiştir.

VBA Kodu:

 Sub Remove_Filters1() Dim lstObj As ListObject Set lstObj = Sheet1.ListObjects(1) lstObj.AutoFilter.ShowAllData End Sub 

• Bundan sonra, kodu çalıştırmak için RubSub düğmesine veya klavye kısayoluna basarak F5 .

• Ve son olarak, adımları takip etmek çalışma sayfanızdaki excel tablosundan tüm filtreleri kaldıracaktır.

VBA Kod Açıklaması

 Sub Remove_Filters1() 

Alt koddaki işi halletmek için kullanılan ancak herhangi bir değer döndürmeyen bir kod parçasıdır. Alt prosedür olarak da bilinir. Bu yüzden prosedürümüzü şöyle adlandırıyoruz Remove_Filters1() .

 Dim lstObj As ListObject 

Değişken bildirimi.

 Set lstObj = Sayfa1.ListObjects(1) 

VBA Set basitçe, kodu çalıştırırken seçmemiz gereken aralığı tekrar tekrar yazmak zorunda kalmamamızı sağlar. Böylece, referansı sayfadaki ilk tabloya ayarlarız.

 lstObj.AutoFilter.ShowAllData 

Bu kod satırı, tüm veriler için tüm filtreleri kaldıracaktır.

 End Sub 

Bu işlem prosedürü sonlandıracaktır.

Daha fazlasını okuyun: Excel'de Filtre Nasıl Kaldırılır (5 Kolay & Hızlı Yol)

2. VBA Kullanarak Bir Sayfadaki Tüm Excel Tablo Filtrelerini Temizleyin

Bir sayfadaki tüm excel tablo filtrelerini kaldırmak için Excel VBA'yı kullanmanın başka bir örneğine bakalım. Bunun için aşağıdaki adımları izleyin.

ADIMLAR:

• İlk olarak, şu adrese gidin Geliştirmek şeridinden r sekmesini seçin.
• İkinci olarak Visual Basic açmak için Visual Basic Düzenleyicisi .
• Açmanın başka bir yolu Visual Basic Düzenleyicisi sadece basmaktır Alt + F11 .
• Veya sayfaya sağ tıklayın, ardından Kodu Görüntüle .
• Sonra, şu adrese gidin Ekleme ve seçin Modül açılır menüsünden seçin.
• Bu da visual basic penceresini açacaktır.
• Bundan sonra, kopyalayıp yapıştırın VBA kodu aşağıda.

VBA Kodu:

 Sub Remove_Filters2() Dim lstObj As ListObject For Each lstObj In Sheet2.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj End Sub 

• Ayrıca, şu düğmeye basın F5 tuşu ya da Alt Çalıştır düğmesine basarak kodu çalıştırın.

• Ve bu kod, sayfanızdaki tüm excel tablo filtrelerini temizleyecek ve aşağıdaki gibi bir çıktı verecektir Yöntem 1 .

VBA Kod Açıklaması

 For Each lstObj In Sheet2.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj 

Bu kod satırları sayfadaki tüm tablolar arasında döngü oluşturur ve tüm çalışma sayfası için tüm filtreleri kaldırır.

Daha fazlasını okuyun: Excel Pivot Tablo Nasıl Filtrelenir (8 Etkili Yol)

3. Excel'de VBA ile Bir Sütundan Filtreyi Kaldırma

Excel VBA ile bir sütundan filtreyi temizlemenin başka bir yoluna bir göz atalım. Bunun için prosedürü görelim.

ADIMLAR:

• Başlamak için Geliştirici sekmesine tıklayın.
• İkinci olarak Visual Basic Düzenleyicisi üzerine tıklayarak Visual Basic .
• Alternatif olarak, şu adrese de erişebilirsiniz Visual Basic Düzenleyicisi tuşuna basarak Alt + F11 .
• Ya da, sağ tıklayın sayfasına gidin ve Kodu Görüntüle menüden.
• Sonra, seçin Modül altındaki açılır kutudan Ekleme .
• Ve visual basic penceresi görünecektir.
• Kodu oraya yazın.

VBA Kodu:

 Sub Remove_Filter3() Sheet1.Range("B3:D16").AutoFilter Field:=4 End Sub 

• Son olarak, tuşuna basın. F5 tuşu kodu çalıştırmak için.

• Bu kodu kullanmak, excel tablonuzdaki bir sütundan filtreyi kaldıracaktır.

VBA Kod Açıklaması

 Sheet1.Range("B3:D16").AutoFilter Alan:=4 

Bu kod satırı yalnızca alan numarasını belirtir ve başka parametre belirtmez.

Daha fazlasını okuyun: Excel VBA ile Aynı Sütunda Birden Fazla Kritere Göre Filtreleme (6 Örnek)

Benzer Okumalar

• Excel VBA: Dizide Birden Çok Ölçütle Filtreleme (7 Yol)
• Excel'de Verileri Tarihe Göre Filtrelemek için VBA Kodu (4 Örnek)
• Korumalı Excel Sayfasında Filtre Nasıl Kullanılır (Kolay Adımlarla)
• Excel VBA'da Farklı Sütunları Birden Çok Kritere Göre Filtreleme
• Excel'de Verileri Filtrelemek için VBA Kodu (8 Örnek)

4. Etkin Çalışma Sayfasındaki Tüm Filtreleri Temizleme

Şimdi, bir diğerine göz atın Excel VBA metodunu kullanarak aktif bir çalışma sayfasındaki tüm filtreleri temizleyebilirsiniz. Adımları takip edelim.

ADIMLAR:

• Başlamak için şeridi açın ve Geliştirici seçenek.
• Ardından, erişim için Visual Basic Düzenleyicisi üzerine tıklayın Visual Basic .
• Basmak Alt + F11 aynı zamanda Visual Basic Düzenleyicisi .
• Alternatif olarak, sağ tıklayın sayfasını seçin ve Kodu Görüntüle görüntülenen menüden.
• Şimdi Ekleme aşağı açılır seçeneğini seçin Modül .
• Ardından kopyalayıp yapıştırın VBA aşağıdaki kod.

VBA Kodu:

 Public Sub RemoveFilter() If ActiveSheet.FilterMode = True Then ActiveSheet.ShowAllData End If End Sub 

• tuşuna basarak kodu çalıştırın. F5 Anahtar.

• Ve son olarak, bunu kullanarak verilerinizden filtreleri kaldırabileceksiniz VBA gibi kod Yöntem-1 .

Daha Fazla Oku: Excel'de Başka Bir Sayfadaki Listeye Göre Nasıl Filtreleme Yapılır (2 Yöntem)

5. Bir Çalışma Kitabından Tüm Filtreleri Kaldırmak için Excel VBA

Hadi bir başkasını keşfedelim r Excel VBA Bir çalışma kitabından tüm filtreleri kaldırmanın yolu. Şimdi aşağıdaki adımlara bakalım.

ADIMLAR:

• Başlamak için şeridi açın ve Geliştirici açılır menüsünden seçin.
• Ardından şunları seçin Visual Basic açmak için Visual Basic Düzenleyicisi .
• Bu Visual Basic Düzenleyicisi tuşuna basarak da erişilebilir. Alt + F11 .
• Alternatif olarak, şunları yapabilirsiniz sağ tıklayın sayfasını seçin ve Kodu Görüntüle açılır menüden.
• Bundan sonra, şunları seçin Modül bir şey yok. Ekleme açılır menüsü.
• Ardından aşağıdaki VBA kodunu kopyalayıp yapıştırın.

VBA Kodu:

 Sub Remove_Filters_From_Workbook() Dim shtnam As Worksheet Dim lstObj As ListObject For Each shtnam In Worksheets For Each lstObj In shtnam.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj Next shtnam End Sub 

• Son olarak, kodu şu tuşa basarak çalıştırın F5 klavyenizde ve sonucu çalışma sayfanızda görürsünüz.

• Bu VBA kodu, tüm çalışma kitabınızdaki tüm filtreleri aşağıda gösterildiği gibi temizleyecektir Birinci Yöntem .

VBA Kod Açıklaması

 For Each shtnam In Worksheets For Each lstObj In shtnam.ListObjects lstObj.AutoFilter.ShowAllData Next lstObj Next shtnam 

İlk döngü, çalışma kitabındaki tüm tablolar arasında döngü oluşturmak içindir. İkinci döngü, çalışma sayfasındaki tüm tablolar arasında döngü oluşturmak içindir. Ardından, döngünün içindeki satır sadece tablodaki filtreyi temizler. Bundan sonra, döngüyü son iki satırla kapatın.

Daha fazlasını okuyun: Excel Filtresi için Kısayol (Örneklerle 3 Hızlı Kullanım)

Sonuç

Yukarıdaki yöntemler size şu konularda yardımcı olacaktır Excel VBA'da Filtre Kaldırma Umarım bu size yardımcı olur! Herhangi bir sorunuz, öneriniz veya geri bildiriminiz varsa lütfen yorum bölümünde bize bildirin. Veya aşağıdaki diğer makalelerimize göz atabilirsiniz ExcelWIKI.com Blog!