VBA COMPTER LE NB D'OCCURENCE

Fermé
Signaler
-
 NikoBübü -
Bonjour à tous !!!

Voilà je vien à vous car je n'arrive pas à faire une fonction correcte et rapide,
pour trouver le nombre d'occurence dans ma feuille excel !

en fouinant un peus j'ai trouver cette fonction très astucieuse
qui consiste à compter le nombre de remplacement que l'on fait !
Function NbOc(Chaine As String, Ch As String) As Long

  NbOc = (Len(Chaine) - Len(Replace(Chaine, Ch, ""))) / Len(Ch)

End Function


mais malheursement cette fonction ne fonction pas chez moi :(
si quelqu'un pourrais m'aider ! xD

bye byee
A voir également:

6 réponses

je pense que tu veux plutot faire:
1) compter le nombre de caracteres dans la chaine originale
2) remplacer tes "1" par "" avec la fonction Replace()
3) recompter le nomre de caracteres
4) comparer le 1er et le 2e comptage
tu aura ainsi le nombre de "1" dans ta chaine

ca donne:

Sub test()
Dim str As String
Dim num, num2 As Integer

str = "abc1def1ghi1jkl113265481"
num1 = Len(str)
str = Replace(str, "1", "")
num2 = Len(str)

num1 = num1 - num2
MsgBox ("il y a " & num1 & " fois le chiffre 1 dans la chaine")

End Sub
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 41989 internautes nous ont dit merci ce mois-ci

petit up ! :)
Messages postés
3288
Date d'inscription
lundi 10 novembre 2008
Statut
Membre
Dernière intervention
2 mars 2016
307
Bonjour,
Tu cherche a detecter le nbre d'appartition d'un mot ou d'un caractere dans ta feuille excel c'est ca?
oui exactement dans mon cas précis je cherche a compter le nombre de fois la valeur "1" !
je l'ai fais avec un compteur sur une certaine colonne sacahnt ou je dois trouver mes valeurs!
mais l'astuce de mon premier poste me paressais étre bonne !
Messages postés
3288
Date d'inscription
lundi 10 novembre 2008
Statut
Membre
Dernière intervention
2 mars 2016
307
En fait je ne comprend pas trop l'astuce de ton premier poste car pour la fonction Len sers a recuperer la longueur d'une chaine de caractere :/
Donc je vois pas trop comment ca marche, enfin en l'occurence ca marche pas!
mais moi pr faire j'aurai fais un boulce sur toute les cellules avec un test donc en gros ce que tu as fais je pense :)
Messages postés
8700
Date d'inscription
dimanche 8 avril 2007
Statut
Contributeur
Dernière intervention
22 janvier 2020
1 188
Bonjour,
Faudrait un peu mieux détailler ce que tu veux faire.
Nombre d'occurence dans ta feuille ?
Une partie du contenu des cellules ?
par ex: rechercher AA dans toutes les cellules
ou rechercher l'entièreté des contenu cellules
Par exemple cellule A1 contient "Ces mots" ... rechercher dans la feuille s'il y a d'autre cellules qui contiennent "Ces mots" ?
Tu dit
non enfaite je voulais faire une recherche sur une plage combien de fois je retrouver la valeur "1" dans une cellule compléte! oui en effet j'ai fait une boucle !

sinon j'ai un autre petit probleme d'algo cette fois ci!
je voudrais faire :

If

instruction 1

else

instrction 2

je voudrais si mon IF est correcte faire l'instruction 1 ET 2 ou si cas contraire faire linstrcution 2 !

mais dans mon cas je fais soit l'instruction 1 soit l'instruction 2 !quelqu'un pourrait m'aider à m'éclairer

merci
Messages postés
3288
Date d'inscription
lundi 10 novembre 2008
Statut
Membre
Dernière intervention
2 mars 2016
307
Comme ca

if
instruction1
end if

instruction 2