Macro suppression de doublon
Fermé
zo2lapesca
Messages postés
32
Date d'inscription
lundi 18 janvier 2010
Statut
Membre
Dernière intervention
12 mai 2011
-
25 mars 2010 à 16:09
zo2lapesca Messages postés 32 Date d'inscription lundi 18 janvier 2010 Statut Membre Dernière intervention 12 mai 2011 - 25 mars 2010 à 18:04
zo2lapesca Messages postés 32 Date d'inscription lundi 18 janvier 2010 Statut Membre Dernière intervention 12 mai 2011 - 25 mars 2010 à 18:04
A voir également:
- Macro suppression de doublon
- Forcer suppression fichier - Guide
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Macro word - Guide
- Supprimer doublon excel - Guide
- Suppression page word - Guide
1 réponse
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 311
25 mars 2010 à 17:41
25 mars 2010 à 17:41
bonjour
essaies cette macro
essaies cette macro
Sub supprim() Dim derlig As Long, cptr As Long Dim coll As Collection derlig = Range("E65536").End(xlUp).Row Set coll = New Collection For cptr = 1 To derlig On Error Resume Next coll.Add Cells(cptr, 5).Value, CStr(Cells(cptr, 5).Value) If Err.Number > 0 Then: Range(Cells(cptr, 6), Cells(cptr, 23)).ClearContents On Error GoTo 0 Next Set coll = Nothing End Sub
25 mars 2010 à 18:04