Bonjour,
j'aimerais supprimer des doublons via VBA de la manière suivante.
si A1<> C1 alors A1 et B1 delete.
j'ai par conséquent écrit le code suivant, mais je crains qu'il y ait des erreurs, y aurait il quelqu'un qui pourrait m'aider à le corriger ?
j'aimerais supprimer des doublons via VBA de la manière suivante.
si A1<> C1 alors A1 et B1 delete.
j'ai par conséquent écrit le code suivant, mais je crains qu'il y ait des erreurs, y aurait il quelqu'un qui pourrait m'aider à le corriger ?
Code:
Sub coconut()
Dim i As Long
Dim j As Long
j = i
For i = Range("A65536").End(xlUp).Row To 2 Step -1
If Cells(i, 1) <> Cells(j, 3) Then Rows(i, 1 And i, 2).Delete
Next i
End Sub