Formule VBANombre de Caractere 1er Mot
Résolu/Fermé
A voir également:
- Formule VBANombre de Caractere 1er Mot
- Caractère ascii - Guide
- Piratage facebook changer mot de passe - Guide
- Formule si et - Guide
- Caractere speciaux - Guide
- Formule excel - Guide
3 réponses
Bidouilleu_R
Messages postés
1181
Date d'inscription
mardi 27 mai 2008
Statut
Membre
Dernière intervention
12 juillet 2012
291
3 juin 2010 à 10:02
3 juin 2010 à 10:02
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
chossette9
Messages postés
4239
Date d'inscription
lundi 20 avril 2009
Statut
Contributeur
Dernière intervention
12 septembre 2014
1 308
3 juin 2010 à 10:03
3 juin 2010 à 10:03
Bonjour,
voici l'écriture correcte de ta Macro :
Cordialement.
voici l'écriture correcte de ta Macro :
Sub Nb()
Chaine = Range("A1")
NbCar1erMot = Len(Left(Chaine, WorksheetFunction.Search(" ", Chaine, 1) - 1))
Range("C3") = NbCar1erMot
End Sub
Cordialement.
