Bonjour,
j'aimerais récupérer les cellules de la première colonne de la feuil 1 avec les terminaisons IAX, LSX,LCX
et les regroupées sur la feuille 2 en gardant le même tableau.
J'ai pensé à ce code :
mais il n'est pas très fonctionnel.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub recherche_copie_plage() Dim cel As Range, plage As Range With Sheets("Sheets 1") Set cel = .Columns(1).Find("IAX") Set cel = .Columns(1).Find("LSX") Set cel = .Columns(1).Find("LCX") Debug.Print cel.Row Debug.Print cel.Column Set plage = .Range(.Cells(cel.Row, cel.Column), plage.Copy Destination:=Workbook("").Sheets("Feuil2").Range("A2,H2") End With End Sub
Je suis vraiment débutant en VBA.
Je vous remercie d'avance de l'aide que vous pourrez m'apporter.
Franck
Partager