Discussion :

[steph05]

Bonjour,

Je souhaite compter le nombre de cellules différentes dans une colonne. (compter le nombre de lignes sans prendre en compte les doublons).

J'ai installé une fonction nb.diff qui le fait, mais ma dernière cellule n'est pas fixe. Je ne sais donc pas comment faire pour sélectionner ma plage de données.

J'ai écrit ceci mais ça ne marche pas (je veux compter la colonne A et mettre le résultat en B1):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Range("A1").Select
Selection.End(xlDown).Select
Range("B1") = "=NB.DIFF(RC[-1]: activecell)"

Sinon, y-a-t-il une autre solution ?
Merci pour votre aide

[tirex28]

Bonjour,

Essaye comme ceci:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Dim NumLig As Long
 
NumLig=Range("A1").End(xlDown).Row
 
Range("B1").FormulaR1C1 = "=NB.DIFF(RC[-1]:R[" & NumLig & "]C[-1])"

(Non testé)

Cordialement,
Tirex28/