Bonjour à tous.

Je ne sais pas comment faire pour passer à la cellule visible suivante ou précédente.

Après avoir fait des recherches sur plusieurs forums le n’ai pas trouvé de solutions.

Avec ce bout de:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
Range("A:A").Find(What:="*", After:=ActiveCell, SearchDirection:=xlNext).SpecialCells(xlCellTypeVisible).Activate 
Range("A:A").Find(What:="*", After:=ActiveCell, SearchDirection:=xlPrevious).SpecialCells(xlCellTypeVisible).Activate
Il ne convient pas : toutes les lignes visibles sont sélectionnées.

J’ai besoin d’un peu d’aide pour résoudre ce problème.

Merci d’avance.