Note: The other languages of the website are Google-translated. Back to English

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 Üretkenliği Araçları

Kutools for Excel Sorunlarınızın Çoğunu Çözer ve Verimliliğinizi% 80 Artırır

  • Yeniden: Hızlıca yerleştirin karmaşık formüller, grafikler ve daha önce kullandığınız her şey; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
  • Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
  • Hücreleri / Satırları / Sütunları Birleştirme Veri kaybetmeden; Bölünmüş Hücre İçeriği; Yinelenen Satırları / Sütunları Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
  • Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
  • Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
  • Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
  • Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
  • Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
  • 300'den fazla güçlü özellik. Office / Excel 2007-2021 ve 365'i destekler. Tüm dilleri destekler. Kuruluşunuzda veya kuruluşunuzda kolay devreye alma. Tam özellikler 30 günlük ücretsiz deneme. 60 günlük para iade garantisi.
kte sekmesi 201905

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!
ofis tabanı
Yorumları sıralama ölçütü
Yorumlar (6)
Henüz derecelendirme yok. İlk değerlendiren siz olun!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Bu çözüm, Otomatik Filtreleri "temizlemez", onları tamamen kaldırır.
Filtreleri sıfırlamak ve sonraki oturum için saklamak için ws.AutoFilterMode = False yerine ws.AutoFilter.ShowAllData kullanın.
Bu yorum sitedeki moderatör tarafından en aza indirildi
Bu yorumunuz için teşekkürler! Elektronik tablom için tam olarak ihtiyacım olan şey buydu. Çok takdir edildi!
Bu yorum sitedeki moderatör tarafından en aza indirildi
Çalışma kitabını kapatırken/çıkarken çalışma sayfalarındaki Tüm filtreleri temizle'yi denedim ama hiç çalışmadı, ihtiyacımız olan bir şey var mı?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba,
Gösterdiğimiz adımlar dışında başka bir işlem gerekmez. Hangi Excel sürümünü kullanıyorsunuz?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Hoe kan ik wel de "filterknoppen" behouden?
Bu yorum sitedeki moderatör tarafından en aza indirildi
Merhaba Tuur,
Gönderideki VBA kodları güncellendi. Rahatsızlıktan dolayı özür dileriz.
Buraya henüz hiç yorum yapılmamış
Lütfen yorum yazın
Misafir olarak yayınlama
×
Bu gönderiyi değerlendirin:
0   Karakterler
Önerilen Konumlar

Bizi takip et

Telif Hakkı © 2009 - www.extendoffice.com. | Tüm hakları Saklıdır. Tarafından desteklenmektedir ExtendOffice. | | | Site Haritası
Microsoft ve Office logosu, Microsoft Corporation'ın Amerika Birleşik Devletleri ve / veya diğer ülkelerdeki ticari markaları veya tescilli ticari markalarıdır.
Sectigo SSL ile korunmaktadır