XL 2019 calcule de somme avec condition

nouri1

XLDnaute Junior
bonjour tout le monde
j'ai une liste de références et je veux calculer la somme des références que j'ai, c'est à dire une colonne qui contient les références comme suit: R1, R1, R1, R1, R2, R2, R3, R2, R2, R3, R1, R3t je veux calculer combien de références j'ai dans cette colonne; (dans ce cas j'ai 3 références dans la colonne,) c'est quoi la formule à utiliser s'il vous plait

cordialement
 

Robert

XLDnaute Barbatruc
Repose en paix
Boujour Nouri, bonjour le forum,

Par formules je ne sais pas faire. Si une proposition VBA te convient, Macro1 si la colonne A contient une cellule "En-Tête" :

VB:
Sub Macro1()
Dim O As Worksheet
Dim TV As Variant
Dim D As Object
Dim COL As Integer

Set O = Worksheets("Feuil1")
TV = O.Range("A1").CurrentRegion
Set D = CreateObject("Scripting.Dictionary")
For I = 2 To UBound(TV, 1)
    D(TV(I, 1)) = ""
Next I
MsgBox D.Count & " Références dans la colonne A."
End Sub

Macro2 si la colonne A ne contient pas de cellule "En-Tête" :
Code:
Sub Macro2()
Dim O As Worksheet
Dim TV As Variant
Dim D As Object
Dim COL As Integer

Set O = Worksheets("Feuil1")
TV = O.Range("A1").CurrentRegion
Set D = CreateObject("Scripting.Dictionary")
For I = 1 To UBound(TV, 1)
    D(TV(I, 1)) = ""
Next I
MsgBox D.Count & " Références dans la colonne A."
End Sub
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
314 628
Messages
2 111 337
Membres
111 104
dernier inscrit
JEMADA