MS Excel - odświeżanie filtra tabeli gdy zmienią się w niej dane

1
6
89

W tabeli z danymi źródłowymi dokonano zmian w kolumnie np. Segment.

W dwóch innych tabelach, które jedynie formułami kopiują dane z tabeli głównej.
Założone są filtry: Segment = "Premium" (wyłączone są puste, zerowe i Legacy), a w drugiej Segment = "Legacy" (wyłączone są puste, zerowe i Premium).

Po zmianach filtr nie odświeża się, tzn. pomimo wyłączonych wartości Legacy, pokaże się wartość, jeśli w danych źródłowych dokonamy zmiany z Premium na Legacy. Dopiero jeśli rozwinę filtr i ponownie zaznaczę, filtr zadziała prawidłowo.

Jak zautomatyzować odświeżenie takiej pochodnej wyfiltrowanej tabeli, jeśli nastąpią zmiany w tabeli źródłowej?

Załączniki

xlsm
odswiez_filtry_on_change.xlsm ( 13K )

Zapytał
@ Jacek_Kotowski | 12.03.2015
- lider
- laureat
- ekspert
- 60
- 54
- 94

15

Panie Jacku.

Private Sub Worksheet_Change(ByVal Target As Range)

' zmiany automatyczne tylko dla obszaru tabeli głównej
If Not Intersect(Target, ActiveSheet.ListObjects("Table1").Range) Is Nothing Then


ActiveSheet.ListObjects("Table2").Range.AutoFilter Field:=1, Criteria1:="Premium"
ActiveSheet.ListObjects("Table24").Range.AutoFilter Field:=1, Criteria1:="Legacy"

End If

End Sub

Patrz załącznik.

Załączniki

xlsm
odswierz filtr on change.xlsm ( 27K )

Skomentuj

Odpowiedział
@ | 14.03.2015
TRENER ALTKOM AKADEMII

Pytanie