İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel-də qabaqcıl filtre nəticəsini avtomatik olaraq necə yeniləyə bilər?

Ətraflı Filter funksiyasını tətbiq edərkən, biz süzülmüş nəticənin meyarlar dəyişməsi ilə avtomatik olaraq dəyişməyəcəyini görürük. Yeni nəticə əldə etmək üçün Advanced Filter funksiyasını yenidən tətbiq etmək lazımdır. Lakin, Excel-də göstərilən ekran görüntüsü kimi, inkişaf etmiş filtre nəticəsində avtomatik olaraq güncellenmek üçün yaxşı və sürətli bir oyun varmı?

VBA koduyla avtomatik olaraq qabaqcıl filtre nəticəsini güncəlləşdirin


VBA koduyla avtomatik olaraq qabaqcıl filtre nəticəsini güncəlləşdirin


Aşağıdakı VBA kodu, ehtiyac duyduğunuz ölçüləri dəyişdikdə avtomatik olaraq inkişaf etmiş filtre nəticəsində güncəlləşməyinizə kömək edə bilər, belə edin:

1. Verilən məlumatları avtomatik olaraq filtrelemek istədiyiniz hesabat sekmesini sağa basın və sonra seçin Kodları baxın kontekst menyusundan, açıldı Proqramlar üçün Microsoft Visual Basic pəncərədə, boş kodu daxil edin və aşağıdakı kodu yapışdırın:

VBA kodu: qabaqcıl filter nəticəini yeniləyin:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("A5:D21").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:=Range _
("A1:C3"), Unique:=False
End Sub

Qeyd: Yuxarıda göstərilən kodda: A5: D21 filtrelemek istediğiniz veri üçündür, A1: C3 filter əsasında ölçülmə üçündür.

2. Sonra meyarların meyarında meyarları dəyişdikdə kodu pəncərəni saxlayıb bağlayın, filtrlənmiş nəticə bir dəfə avtomatik olaraq yenilənəcək.



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    klaus · 2 days ago
    @Hannah: Yes, it is possible.
    In the following code the criteria is on the sheet "Filter".


    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Range("A5:D23").AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
    Sheets("Filter").Range("A1:C3"), Unique:=False
    End Sub
  • To post as a guest, your comment is unpublished.
    invité · 5 months ago
    Ce code donne une erreur 1004 référence non valide. pouvez vous corriger le code proposé?
  • To post as a guest, your comment is unpublished.
    Christine · 5 months ago
    Bonjour, merci pour votre post qui m'aide énormément. Toutefois quel serait le code à ajouter pour coller le résultat dans un tableau d'une autre feuille de fichier et si possible pour au passage ne coller que certaines colonnes ?
    Pour être plus précise, en utilisant votre exemple je voudrais copier uniquement les colonnes "Product" et "Name" du résultat du filtre et ce dans une nouvelle feuille. Merci.
  • To post as a guest, your comment is unpublished.
    Hannah · 1 years ago
    Can I make the criteria come from a second sheet?
  • To post as a guest, your comment is unpublished.
    sumeet · 1 years ago
    it refreshes every time when any data changes.

    is it possible to refresh only when criteria changes.