Bonjour Dhany,
Merci beaucoup pour ta réponse.
Je suis sûr que le code est bon mais pour l'appliquer à mon fichier réel, je dois appeler des onglets (j'ai compris comment l'éditer) et des colonnes différentes. Est-ce que tu saurais me dire, quelle partie du code fait appel à la colonne numéro pièce, quelle partie fait appel aux colonnes à copier ?
Je cherche quand même de mon côté, j'espère comprendre ton code :p
J'ai lancé la moulinette avec ça (mais ça a planté, sans doute parce que j'ai plus de 20000 lignes à itérer) :
Charger données de DCO de la colonne 3 vers l'onglet généralités colonne 28 c'est ça ?
Sub CpyData()
If ActiveSheet.Name <> "Generalites" Then Exit Sub
Dim ws As Worksheet, dl1&, dl2&, lg1&, lg2&
Set ws = Worksheets("DCO")
Application.ScreenUpdating = 0
dl2 = Cells(Rows.Count, 1).End(xlUp).Row
dl1 = ws.Cells(Rows.Count, 1).End(xlUp).Row
For lg1 = 2 To dl1
With ws.Cells(lg1, 1)
For lg2 = 2 To dl2
If Cells(lg2, 1) = .Value Then
Cells(lg2, 3) = .Offset(, 28)
Exit For
End If
Next lg2
End With
Next lg1
End Sub
Merci pour ton retour,
Bonne journée et week end