Ana içeriğe atla

Excel'de çalışma kitabını açarken, kaydederken veya kapatırken filtreler nasıl temizlenir?

Çalışma kitabınızda filtrelenmiş veriler içeren birden çok çalışma sayfanız olduğunu varsayalım. Tüm filtreleri temizlemek için, farklı çalışma sayfalarındaki filtrelenmiş listeyi kontrol etmeniz ve ardından bunları tek tek manuel olarak temizlemeniz gerekir. Bu sinir bozucu! Bu makalede, Excel'de bir çalışma kitabını açarken, kaydederken veya kapatırken filtreleri temizlemenin birkaç yöntemini göstereceğiz.

Excel'de çalışma kitabını açarken filtreleri temizle
Çalışma kitabını Excel'de kaydederken filtreleri temizle
Excel'de çalışma kitabını kapatırken / çıkarken filtreleri temizle


Excel'de çalışma kitabını açarken filtreleri temizle

Bu bölüm, bir çalışma kitabını açarken tüm çalışma sayfalarındaki filtreleri temizlemekten bahsediyor. Lütfen aşağıdaki işlemleri yapın.

1. Bir çalışma kitabında, açarken tüm filtreleri otomatik olarak temizlemeniz gerekir, lütfen Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. içinde Uygulamalar için Microsoft Visual Basic pencere, lütfen çift tıklayın Bu Çalışma Kitabı solda Proje bölmesine gidin ve ardından aşağıdaki VBA kodunu kopyalayıp Bu Çalışma Kitabı (Kod) pencere. Ekran görüntüsüne bakın:

VBA kodu: Çalışma kitabını açarken tüm filtreleri temizleyin

Private Sub Workbook_Open()
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
    Next ws
End Sub

3. Tuşuna basın. Ara Toplam + Q çıkış tuşları Uygulamalar için Microsoft Visual Basic pencere.

4. tık fileto > Farklı Kaydet. Haşhaşta Farklı Kaydet iletişim kutusunda, bu çalışma kitabını kaydetmek için bir klasör belirtin, dosya adı kutusunu seçin ve ardından Excel Makro Etkin Çalışma Kitabı seçeneği Kayıt türü açılır listeyi ve son olarak İndirim düğmesine basın.

Şu andan itibaren, bu Makro Etkin Çalışma Kitabı açıldığında, bu çalışma kitabındaki tüm filtreler otomatik olarak temizlenecektir.


Çalışma kitabını Excel'de kaydederken filtreleri temizle

Her kaydedişinizde geçerli çalışma kitabındaki tüm filtreleri temizleyebilirsiniz.

1. Çalışma kitabındaki tüm filtreleri otomatik olarak temizlemeniz gerekir, lütfen Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. içinde Uygulamalar için Microsoft Visual Basic pencere, lütfen çift tıklayın Bu Çalışma Kitabı solda Proje bölmesine gidin ve ardından aşağıdaki VBA kodunu kopyalayıp Bu Çalışma Kitabı (Kod) pencere. Ekran görüntüsüne bakın:

VBA kodu: Çalışma kitabını kaydederken filtreleri temizle

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
    Next ws
End Sub

3. Basın Ara Toplam + Q çıkış tuşları Uygulamalar için Microsoft Visual Basic pencere.

Şu andan itibaren, çalışma kitabını kaydederken tüm filtreler otomatik olarak temizlenecektir.


Excel'de çalışma kitabını kapatırken / çıkarken filtreleri temizle

Son bölümde, çalışma kitabını kapatırken veya çıkarken çalışma sayfalarındaki tüm filtreleri nasıl temizleyeceğinizi göstereceğiz.

1. Tüm filtreleri otomatik olarak temizlemeniz gereken çalışma kitabını açın ve ardından Ara Toplam + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. içinde Uygulamalar için Microsoft Visual Basic pencere, lütfen çift tıklayın Bu Çalışma Kitabı solda Proje bölmesine gidin ve ardından aşağıdaki VBA kodunu kopyalayıp Bu Çalışma Kitabı (Kod) pencere. Ekran görüntüsüne bakın:

VBA kodu: Çalışma kitabını kapatırken / çıkarken çalışma sayfalarındaki tüm filtreleri temizleyin

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Dim ws As Worksheet
    For Each ws In Worksheets
        If ws.AutoFilterMode Then
            ws.AutoFilterMode = False
        End If
    Next ws
End Sub

not: Yalnızca mevcut çalışma sayfasındaki filtreleri temizlemek istiyorsanız, lütfen aşağıdaki VBA kodunu kullanın.

VBA kodu: Çalışma kitabını kapatırken etkin sayfadaki filtreyi temizle

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Updated by Extendoffice 20221012
    Dim ws As Worksheet
    Set ws = ActiveSheet
        If ws.AutoFilterMode Then
            ws.ShowAllData
        End If
End Sub

3. Basın Ara Toplam + Q çıkış tuşları Uygulamalar için Microsoft Visual Basic pencere.

Şu andan itibaren, çalışma kitabındaki Kapat düğmesine tıklandıktan sonra tüm filtreler otomatik olarak temizlenecektir.


İlgili Makaleler:

En İyi Ofis Üretkenlik Araçları

🤖 Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
Süper Arama: Çoklu Ölçütlü VLookup    Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu    Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz    E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
En İyi 15 Araç Seti12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

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...

Açıklama


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!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hoe kan ik wel de "filterknoppen" behouden?
This comment was minimized by the moderator on the site
Hi Tuur,
The VBA codes in the post have been updated. Sorry for the inconvenience.
This comment was minimized by the moderator on the site
I tried the Clear all filters across worksheets when closing/exiting workbook but it didn't work at all, is there anything we need to?
This comment was minimized by the moderator on the site
Hi,
No other operations are required except the steps we shown. Which Excel version are you using?
This comment was minimized by the moderator on the site
This solution doesn't "clear" the AutoFilters, it removes them completely.
To reset the filters and retain them for the next session, substitute ws.AutoFilter.ShowAllData for ws.AutoFilterMode = False
This comment was minimized by the moderator on the site
Thank you for this comment! This is exactly what I needed for my spreadsheet. Much appreciated!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations