Formule VBANombre de Caractere 1er Mot
Résolu
djca
-
djca -
djca -
Bonjour,
et merci d'avance de l'aide que vous pourrez m'apporter
je veux écrire une macro dont le point de départ est le nombre de caractère du 1er mot de la phrase contenu dans la cellule
dans le classeur Excel
"paris sera toujours paris" en A1 --
formule en B1 =NBCAR(GAUCHE(A3;CHERCHE(" ";A3;1)-1))
je n'arrive pas à transposer cette formule dans ma macro // message d'erreur
Sub Nb()
Chaine = Range("A1")
NbCar1erMot = "=LEN(LEFT(Chaine,SEARCH("" "",Chaine,1)-1))"
Range("C3") = NbCar1erMot
End Sub
un grand merci d'avance
et merci d'avance de l'aide que vous pourrez m'apporter
je veux écrire une macro dont le point de départ est le nombre de caractère du 1er mot de la phrase contenu dans la cellule
dans le classeur Excel
"paris sera toujours paris" en A1 --
formule en B1 =NBCAR(GAUCHE(A3;CHERCHE(" ";A3;1)-1))
je n'arrive pas à transposer cette formule dans ma macro // message d'erreur
Sub Nb()
Chaine = Range("A1")
NbCar1erMot = "=LEN(LEFT(Chaine,SEARCH("" "",Chaine,1)-1))"
Range("C3") = NbCar1erMot
End Sub
un grand merci d'avance
A voir également:
- Formule VBANombre de Caractere 1er Mot
- Caractère ascii - Guide
- Trousseau mot de passe iphone - Guide
- Formule si et - Guide
- Caractère spéciaux - Guide
- Mot de passe - Guide
3 réponses
Sub traitechaine()
Dim Chaine As String
dim nbre1 as integer
Chaine = Range("A1") ' Paris ser toujours Paris
nbre1 = Len(Left(Chaine, InStr(1, Chaine, " ") - 1))
range("C3")=nbre1
End Sub
Dim Chaine As String
dim nbre1 as integer
Chaine = Range("A1") ' Paris ser toujours Paris
nbre1 = Len(Left(Chaine, InStr(1, Chaine, " ") - 1))
range("C3")=nbre1
End Sub