Compter le nombre de modalités
Résolu
jeepipy
Messages postés
88
Statut
Membre
-
jeepipy Messages postés 88 Statut Membre -
jeepipy Messages postés 88 Statut Membre -
Bonjour,
Je cherche une formule en VBA pour obtenir le nombre de modalités différentes d'une colonne.
Je vous remercie.
Cordialement
Je cherche une formule en VBA pour obtenir le nombre de modalités différentes d'une colonne.
Je vous remercie.
Cordialement
A voir également:
- Compter le nombre de modalités
- Nombre de jours entre deux dates excel - Guide
- Afficher le 0 devant un nombre dans excel - Guide
- Compter le nombre de cellule de couleur excel 2016 - Guide
- Nombre de page - Guide
- Compter le nombre de croix dans une colonne excel ✓ - Forum Excel
5 réponses
Bonjour
sans VBA, pour un champ de B2 à B28, à adapter
=SOMME(SI(B2:B38<>"";1/NB.SI(B2:B38;B2:B38)))
formule matricielle à entrer avec la touche enter en maintenant les touches ctrl et shift enfoncées
crdlmnt
sans VBA, pour un champ de B2 à B28, à adapter
=SOMME(SI(B2:B38<>"";1/NB.SI(B2:B38;B2:B38)))
formule matricielle à entrer avec la touche enter en maintenant les touches ctrl et shift enfoncées
crdlmnt
Bonjour Eric,
je vous remercie.
La solution se précise:
la formule Range("G11") = Evaluate("=SUMPRODUCT( 1/COUNTIF(AF3:AF242,AF3:AF242) )") fonctionne bien.
Mais je voudrais travailler sur une colonne dont la taille est dynamique et la formule ci-dessous renvoie une erreur "#valeur".
Range("G11") = Evaluate("=SUMPRODUCT( 1/COUNTIF(AF3:AF " & der_lig & ",AF3:AF" & der_lig & ") )")
Merci de votre aide.
Bonne journée.
je vous remercie.
La solution se précise:
la formule Range("G11") = Evaluate("=SUMPRODUCT( 1/COUNTIF(AF3:AF242,AF3:AF242) )") fonctionne bien.
Mais je voudrais travailler sur une colonne dont la taille est dynamique et la formule ci-dessous renvoie une erreur "#valeur".
Range("G11") = Evaluate("=SUMPRODUCT( 1/COUNTIF(AF3:AF " & der_lig & ",AF3:AF" & der_lig & ") )")
Merci de votre aide.
Bonne journée.
Bonjour à tous
Puisque tu veux utiliser du VBa, il y a des objets "prets à cuire" qui existent dans ce langage. dans ton cas l'objet dictionary
par exemple avec colonne de taille variable
la maquette:
https://mon-partage.fr/f/McOHUqDR/
Puisque tu veux utiliser du VBa, il y a des objets "prets à cuire" qui existent dans ce langage. dans ton cas l'objet dictionary
par exemple avec colonne de taille variable
Option Explicit
'--------
Sub decompter_occurences()
Dim Dico As Object, Derlig As Integer, Tablo
Dim Idx As Integer
Application.ScreenUpdating = False
With Sheets(1)
Set Dico = CreateObject("scripting.dictionary")
Derlig = .Columns("G").Find(what:="*", searchdirection:=xlPrevious).Row
Tablo = .Range("G2:G" & Derlig)
For Idx = 1 To UBound(Tablo)
If Not Dico.exists(Tablo(Idx, 1)) Then: Dico.Add Tablo(Idx, 1), ""
Next
MsgBox Dico.Count & " occurences colonne G"
End With
End Sub
la maquette:
https://mon-partage.fr/f/McOHUqDR/
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
