Comptage et affichage sans doublon

sousou

XLDnaute Barbatruc

• 22 Mars 2012

• #2

Re : Comptage et affichage sans doublon

re

Sheets("Feuil1").Range("F" & i + 2).Value = col.Item(i).Offset(0, 1)

 

Vote positif 0 Vote négatif

D

degap05

XLDnaute Impliqué

• 22 Mars 2012

• #3

Re : Comptage et affichage sans doublon

Bonjour, Sousou,

Parfait.

Merci beaucoup.

 

Vote positif 0 Vote négatif

H

Habitude

XLDnaute Accro

• 22 Mars 2012

• #4

Re : Comptage et affichage sans doublon

Bonjour

col.Item retourne l'adresse d'une cellule
Les déplacements Offset sont autorisé.

A tester
Remplace

= col.Item(i) +1

par

= col.Item(i).Offset(,1)

 

Vote positif 0 Vote négatif

R@chid

XLDnaute Barbatruc

Supporter XLD

• 22 Mars 2012

• #5

Re : Comptage et affichage sans doublon

Salut,
une solution par formule si tu veux bien.
Voir PJ
Amicalement

 

Pièces jointes

• cumulnom.xls

  44 KB · Affichages: 48

Vote positif 0 Vote négatif

D

degap05

XLDnaute Impliqué

• 22 Mars 2012

• #6

Re : Comptage et affichage sans doublon

Merci à tous de vos réponses.

 

Vote positif 0 Vote négatif