Filter Excel 2003

[enigma18062004]

Hallo,

In een werkblad gebruik ik autofilter.
Linksonderin staat dan bv 23 van de 500 records zijn gevonden.

Hoe kan ik de gevonden aantallen (in dit voorbeeld 23) weer in een cel kopieren om weer verder te kunnen rekenen?

Groet,

Hans

 

[snb]

Als het te filteren gebied A1:K200 is:

[A1:K200].specialcells(xlcelltypevisible).copy sheets("Blad2").range("A1")

dan staan alle gefilterde gegevens in blad 2

 

[enigma18062004]

Als het te filteren gebied A1:K200 is:

[A1:K200].specialcells(xlcelltypevisible).copy sheets("Blad2").range("A1")

dan staan alle gefilterde gegevens in blad 2

Hoi,

Denk dat ik iets onduidelijk ben geweest.
Ik bedoel eigenlijk dat ik het getal 23 (dus uitkomst) in een cel wil plakken, en verder rekenen

 

[Wigi]

Hoi

Bekijk de SUBTOTAAL functie eens, dan wordt het resultaat direct geüpdatet in de sheet (het is een formule), en heb je ook geen verdere VBA nodig.