Récuperer différentes valeurs d'une plage de cellules - VB/VBA/VBS - Programmation
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 !
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 !
  
merci, a+