Bonsoir tout le monde,

Je cherche à faire trouver la ligne du top et du down après avoir fait un filtrage.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
Dim firstrow,lastrow as long
range("A1").select
'activer le filtre
selection.autofilter
selection.autofilter field:=1,criteria1:="machin"
 
'rechercher la 1ere ligne et la dernière
lastrow=Range("A1").End(xlDown).Row
 
'fermer le filtre
selection.autofilter

je trouve correctement la derniere ligne
mais pr trouver la ligne qui commence, j'ai eu bcp de mal
c la ligne juste en bas de l'entete.

Mon besoin est de juste mettre après ces données après le filtrage dans une table de 2 dimension pour les traiter.

Je suis preneur de vos idées.
Merci