XL 2016 couper des lignes non masquees

[sri75]

Bonjour, j'utilise une macro qui recherche du texte dans de cellules et qui ensuite renvoie les données dans une feuille excel

Mon problème est que mon tableau comporte un nombre important de lignes masquées entre les lignes de résultat ( ex j'ai un résultat en ligne 10 puis un autre en ligne 30 et du coup les lignes 11 à 29 sont masquées ).

j'arrive très bien à faire un copier coller des lignes non masquées mais si je veux faire un couper coller cela efface aussi les données masquées de mon tableau.

Si j'utilise une macro pour descendre de ligne la macro ne passe pas de la ligne non masquée à l'autre ( ex de 10 à 30 mais fait 10, 11, 12 etc )

Merci à tous pour vous idées sur ce probleme

 

[job75]

Bonjour sri75,

Si j'utilise une macro pour descendre de ligne la macro ne passe pas de la ligne non masquée à l'autre ( ex de 10 à 30 mais fait 10, 11, 12 etc )

Vous voulez donc faire une boucle, il suffit de tester si la ligne est masquée ou pas :

With plage
    For i = .Rows.Count To 10 Step -1
        If Not .Rows(i).Hidden Then
            'ici votre couper-coller
        End If
    Next
End With

A+

 

[sri75]

Bonjour, et merci pour cette réponse.

je n'arrive pas à faire fonctionner votre code.

Si je pars de la ligne 7 et que je veux m'arreter à la ligne 400, comment adapter le code ?

Merci d'avance pour votre aide.