Suppression doublons mais pas les vides

bonjour,

j'ai un code qui fait ceci:

dans le feuille qui s'appelle Février-2015 quand je clique sur le bouton ADD SHEET il me rajoute une autre feuille qui porte le nom de Mars-2015 et en même temps il supprime les doublons qui se trouve sur la colone A ou il y'a les dates.

mais le problème c'est qu'il me supprime même les lignes dont les cellules de la colone A sont vide même s'il y'a un des formules la dessus; chose qui me donne un resultat incomplet sur les dates de la colonne A c'est a dire les cellules dont je devais avoir 29-Mars et 30-Mars et 31-Mars sont supprimées parce que le moi de fevrier-2015 ces cellules étaient vides comme il y'avait que des formules

quelqu'un pourrait me trouver une solution svp

17suivi-beton.xlsm (63.53 Ko)

Bonjour et bienvenu(e)

A tester

        For i = Lg To 2 Step -1
           If Cells(i, 1) <> "" And WorksheetFunction.CountIf(Range("a:a"), Cells(i, 1)) > 1 Then Rows(i).Delete
        Next i

Bonjour,

je ne serai pas d'une grande aide sur ce type de fichier mais pourquoi ne pas mettre tout dans un seule base de données et puis un TCD fera l'affaire par mois; par type de béton avec des totaux divers ?

P.

Badai

merci bp le code est Nickel

Bonjour

Si ils sont supprimés

oui bainzai j'ai juste mal copié le code

Merci bp

Rechercher des sujets similaires à "suppression doublons pas vides"