A voir également:
- Excel vba compter le nombre d'occurence dans une colonne
- Déplacer une colonne excel - Guide
- Formule somme excel colonne - Guide
- Trier colonne excel - Guide
- Liste déroulante excel - Guide
- Excel compter cellule couleur sans vba - Guide
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) 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
