tabel automatisch vernieuwen na openen werkblad

[backnext]

Hallo

In bijlage zie je een werkmap met 2 werkbladen.
In de eerste een aantal gegevens die kunnen aangevuld worden met nieuwe gegevens.
In het 2e werkblad een tabel gebaseerd op de eerste gegevens met filter. Enkel wedstrijden van HSE A komen er in via een formule.
Nu wil ik na het toevoegen of wijzigen van gegevens op het eerste blad ook die wijzigingen gefilterd zien als ik klik op het 2e blad met tabel en filter.

Hoe kan dat?

Bekijk bijlage conflictzoeker_29_05_16TESTJE_4_vraag.xlsx

 

[Peter B]

Dit kan door een macro te hangen aan het worksheet.activate event. Vervolgens zul je je bestand wel als .xlsm moeten opslaan.

Dit doe je als volgt:
Ga met <ALT><F11> naar VB
Selecteer blad3 (HSE-A)

Plaats de volgende code:

Private Sub Worksheet_Activate()

    ActiveSheet.ListObjects("Tabel1").Range.AutoFilter Field:=1, Criteria1:= "<>"

End Sub

 

[backnext]

Dat werkt prima. Bedankt daarvoor.
Maar nu wil ik nog werkbladen toevoegen waar dan tabellen voor andere ploegen in komen die telkens gefilterd worden uit het hoofdblad.
Als ik er zo eentje bijmaak op dezelfde manier krijg ik volgende foutmelding:
"Fout 9 tijdens uitvoering:
Het subscript valt buiten het bereik"
Ik vermoed dat het met de naam van de tabel te maken heeft maar ik zie niet waar ik de namen van tabellen moet zoeken.

 

[backnext]

Tja, nog wat verder gezocht en gevonden ... bij formules/ namen beheren... Logischer kon niet.

 

[Peter B]

Of de hele tabel selecteren. Dan krijg je naam in het adresveld/ namebox te zien.

Als je tevreden bent mag je de vraag sluiten ...

 

[backnext]

Of nog eenvoudiger bij Ontwerpen: Tabelnaam gewoon veranderen.

 

[backnext]

Je was me voor. Bedankt voor de hulp Peter.