Excel Downloads
Forum

Précédent   Excel Downloads Forums > Excel > Forum Excel


Réponse
 
LinkBack Outils de la discussion
Vieux 28/07/2006, 13h49   #1 (permalink)
XLDnaute Nouveau
 
Date d'inscription: juillet 2006
Messages: 10
Question Encore une bête question qui vous tombe dessus...

Coucou, à nouveau moi !!!

voilà j'ai une liste avec plusieurs doublons de type

a
a
a
b
b
c
d
d

Je voudrais bien effacer les doublons ( grrrrrrrrrrrr)


une astuce ????

merci

c'est la dernière bête question avant le WE

merci!!!!!
strophe est déconnecté   Réponse avec citation
Vieux 28/07/2006, 13h57   #2 (permalink)
XLDnaute Impliqué
 
Avatar de Temjeh
 
Date d'inscription: février 2005
Messages: 587
Par défaut Re : Encore une bête question qui vous tombe dessus...

Bonjour j'ai trouvé ceci 3 sol pour le même prix

Met en col B la col A sans doublons

Code PHP:
Option Explicit
Sub sansdoublons
()
 
Dim n As Integer
 Dim lign 
As Integer
 Dim col 
As Collection
 Set col 
= New Collection
  
For 1 To Range("A65536").End(xlUp).Row
   On Error Resume Next
    col
.Add Range("A" n), CStr(Range("A" n))
   
On Error GoTo 0
  Next n
 lign 
1
  
For 1 To col.Count
   Range
("B" lign) = col(n)
   
lign lign 1
  Next n
End Sub

Aussi supprime ligne entiere
: ...***Faire un trie sur col A avant***

For 
Range("A65536").End(xlUp).Row To 1 Step -1
 
If Range("A" i) = Range("A" 1Then Rows(i).Delete
Next i

Ou clear le doublon mais tu doit trier aussi avant

For Range("A65536").End(xlUp).Row To 1 Step -1
 
If Range("A" i) = Range("A" 1Then Range("A" 1).Clear
Next i 
Temjeh

Dernière modification par Temjeh ; 28/07/2006 à 14h17.
Temjeh est déconnecté   Réponse avec citation
ANNONCES
Réponse

Liens sociaux

Outils de la discussion

Règles de messages
Vous ne pouvez pas créer de nouvelles discussions
Vous ne pouvez pas envoyer des réponses
Vous ne pouvez pas envoyer des pièces jointes
Vous ne pouvez pas modifier vos messages

Les balises BB sont activées : oui
Les smileys sont activés : oui
La balise [IMG] est activée : oui
Le code HTML peut être employé : non
Trackbacks are oui
Pingbacks are oui
Refbacks are oui

Discussions similaires
Discussion Auteur Forum Réponses Dernier message
Question bête Excelloide Forum Excel 9 04/06/2006 16h32
question bete Ludo Forum Excel 2 13/10/2005 02h00
question bete JOJO Forum Excel Downloads - Archives 6 15/07/2004 22h35
Question Bête .... ti-juju Forum Excel Downloads - Archives 5 26/02/2004 20h37
une bête question Alain Forum Excel Downloads - Archives 2 22/02/2004 13h03


Fuseau horaire GMT +2. Il est actuellement 22h45.


(C) 2006 Excel Downloads