Filtre

[manuBX]

Bonjour à tous

après avoir réalisé un filtre
ou je vois apparaître les lignes
par exemple 7 / 10 /15 /89 /104

je désire ouvrir les 3 lignes qui suivent le filtre
par exemple
7/8/9/10/
10/11/12/12
15/16/17/18
89/90/91/92
104/105/106/107

Comment puis je procéder par macro?

Merci d avance

 

[phlaurent55]

Re : Filtre

Bonjour Manu,

voir fichier joint

à+
Philippe

 

[manuBX]

Re : Filtre

Merciiiiiiiiiiiiiiiiiiiiiiiiiiiiii

 

[phlaurent55]

Re : Filtre

Re,

un petit problème dans l'affichage des lignes supérieures sera résolu en remplaçant

For i = Range("A65535").End(xlUp).Row To 1 Step -1

par:
For i = Range("A65535").End(xlUp).Row To 2 Step -1

à+
Philippe