rechercher et dupliquer

[arnaud]

Bonjour le forum,

Je souhaiterai savoir comment faire pour rechercher puis dupliquer certaines données d'une colonne à une autre mais à la même ligne.

Exemple rechercher dans colonnes K:L les valeurs "oui", "non", "?" et les dupliquer en colonne A mais à la même ligne!!

Merci à la personne qui prendra le temps de répondre à ma requète.

Bonne journée à tous.

Arnaud.

 

[omicron]

Bonsoir Arnaud,

Tu trouveras en pièce jointe un petit exemple qui devrait répondre à ton problème si je l'ai bien compris :

=====================================================

Private Sub CommandButton1_Click()
For Each Cel In Intersect(UsedRange, Range("K:L"))
If Cel = "oui" Or Cel = "non" Or Cel = "?" Then Intersect(Cel.EntireRow, Range("A:A")) = Cel
Next Cel
End Sub

=====================================================

Bien entendu, les Ranges "K:L" et/ou "A:A" peuvent être adaptés.

Cordialement

Omicron.