Bonjour!
J'ai un petit voir meme enorme soucis avec une fonction de deblounage que j'ai fait:
Je travail sur un tableau excel a taille variable en nombre de lignes!
Je souhaite dedoublonner le tableau de la maniere suivante:
Soit la ligne l et une ligne l + x.
La ligne l + x est un doublon si et seulement si la cellule de la colonne C de l
est egale a la cellule de la colonne C de l + x ET la cellule de la colonne F de l
est égale a la cellule de la colonne F de l + x ET la cellule de la colonne G de l
est égale a la cellule de la colonne G de l + x.
Si la ligne l + x est un doublon cette ligne doit etre supprimé!
J'ai deja réalisé une fonction or elle ne fonctionne pas, voici le code
Sheets("Tableau").Select
I = 5
M = 6
While Range("G" & I).Value <> ""
While Range("G" & M).Value <> ""
If Range("C" & I).Value = Range("C" & M).Value
And Range("F" & I).Value = Range("F" & M).Value
And Range("G" & I).Value = Range("G" & M).Value Then
Rows(M).delete
End If
M = M + 1
Wend
I = I + 1
M = I + 1
Wend
Mon erreur est peut etre grossiere mais je n'arrive pas a voir pourquoi cela ne marche pas
Merci d'avance