Bonjour,
J'ai crée un petit code VBA qui a l'objectif suivant :
J'ai une liste de références sur une feuille, je compare ses références avec celles présentes sur une autre feuille. Si les références sont égales je veux écrire la quantité adequouat dans la première feuille.
Ca donne ca :
Voilà la marco met vraiment beaucoup de temps à se réaliser (plus de 5 minutes). Comment puis-je l'améliorer ?
J'ai crée un petit code VBA qui a l'objectif suivant :
J'ai une liste de références sur une feuille, je compare ses références avec celles présentes sur une autre feuille. Si les références sont égales je veux écrire la quantité adequouat dans la première feuille.
Ca donne ca :
Code:
Sub prendre()
Dim i As Integer
Dim j As Integer
For i = 2 To 5050
For j = 2 To 3250
If Sheets("bon").Cells(i, 1).Value = Sheets("donnee").Cells(j, 1).Value Then
Sheets("donnee").Cells(j, 2).Copy Sheets("bon").Cells(i, 2)
End If
Next
Next
End Sub
Voilà la marco met vraiment beaucoup de temps à se réaliser (plus de 5 minutes). Comment puis-je l'améliorer ?