Récuperer différentes valeurs d'une plage de cellules

Récuperer différentes valeurs d'une plage de cellules - VB/VBA/VBS - Programmation

Marsh Posté le 30-12-2004 à 16:06:26    

Je voulais savoir comment en VBA sous Excel on peut récupérer les différentes valeurs d'une plage de celleules, mais sans avoir de doublons !  :sweat:  
 
merci, a+

Reply

Marsh Posté le 30-12-2004 à 16:06:26   

Reply

Marsh Posté le 31-12-2004 à 20:06:37    

bonjour,
pour faire simple il vaut mieux commencer par trier.
La macro suivante recopie la sélection 5 colonnes plus à droite sans doublons.
 
Sub Test()
For Each o In Selection
o.Activate
v = o.Value '(récupération de chaque cellule)
If o.Value = o.Offset(1, 0).Value Then  
MsgBox "Doublon ligne " & o.Row & " et " & (o.Row + 1)
Else
o.offset(0,5).Value = v   '(copie du résultat)
End If
Next
End Sub
 
Bonne soirée et meilleurs voeux à tous !


Message édité par galopin01 le 31-12-2004 à 20:15:58
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed