Recherche de celkules puis sélectionner la ligne entière

Bonjour.

Un peu novice en macro, je sollicite votre aide éclairée.

dans un fichier excel, j'ai bcp de cellules comprenant le texte CT01.

Je voudrais sélectionner toutes les lignes comprenant ce texte et les copier dans la feuille 02

Idem en suite pour des lignes avec les cellules CT02 à copier dans la feuille 03

merci pour votre aide très s appréciée et belle journée.

Bonjour,

Merci de joindre un fichier afin de t'aider et l'optimiser au mieux (nombre de CT maximum, emplacement de ces CT, nom des feuilles, structure du tableau, passage par un dico ou non, etc ...).

Sauf si tu arrives à adapter ce code par toi même :

Sub test()
For i = 1 to 9
Worksheets("Feuil"& i + 1).Cells.ClearContents
With Worksheets("Feuil1").UsedRange
    .AutoFilter Field:=1, Criteria1:="CT0" & i
    .Copy destination:=Worksheets("Feuil"& i + 1).Range("A1")
End With
Next i
End Sub

Bonne journée.

Bonjour et bienvenue sur le forum

Bonjour à tous

Un essai à tester. Te convient-il ?Bye !

9classeur1-v1.xlsm (28.52 Ko)

Merci bcp pour l'aide. Après plusieurs adaptations tout fonctionne comme désiré. Merci infiniment pour ta réponse.

Rechercher des sujets similaires à "recherche celkules puis selectionner ligne entiere"