Nombre de caractèresRésolu

Question

Je r&#233;alise un fichier en Visual Basic pour Excel et je bloque sur une commande certainement toute simple :
J'aurais voulu savoir comment conna&#238;tre le nombre de caract&#232;res dans une cha&#238;ne (l'&#233;quivalent VB de la fonction NBCAR() )

Merci d'avance

cs_MasterHack · Accepted Answer

len(caractere)

Life is short...Learn more Copy Rights <> Rights to Copy

jpleroisse · Answer

Voici un bout de code qui te donne le nbre de caract&#232;res dans une cha&#238;ne de texte d" un textBox. (un espace est un caract&#232;re).

Private Sub Command1_Click()
Dim i As Integer
For i = 0 To Len(Text1.Text) - 1
Next i
MsgBox i
End Sub

jpleroisse

cs_MasterHack · Answer

jpleroisse :tu es sur!???

Life is short...Learn more Copy Rights <> Rights to Copy

crenaud76 · Answer

jpleroisse < Alors la !! Faudra que tu m'expliques la raison du pourquoi du comment de ton code ?? Ou alors c't'une blague ??

Christophe R

cs_MasterHack · Answer

si c pour avoir le nombre de caractere ds un fichier tu mets nbrchar=Filelen(chemin) Merci

Life is short...Learn more Copy Rights <> Rights to Copy

gilou125 · Answer

Trop bien vous me sauvez la vie, merci beaucoup !!!

Et respect pour l'efficacit&#233; et la rapidit&#233; des r&#233;ponses...

cs_MasterHack · Answer

jpleroisse< en fait ça marche ton truc mais on a pas besoin d'un marteau pour tuer une mouche

Life is short...Learn more Copy Rights <> Rights to Copy

jpleroisse · Answer

OK, merci de votre remarque, encore une fois, j'ai r&#233;pondus trop vite .
C'est vrai que pour un fichier &#231;a vaut rien. Mais a ma d&#233;charge ce code fonctionne quand m&#234;me pour rechercher le nbre de caract&#232;res dans un text (TextBox, RichtTexBox ect...)
 
jpleroisse

crenaud76 · Answer

Ouais ton code marche pour compter le Nb de caract&#232;res dans un textbox, mais tu sais, Len(TextBox1.Text) 
... Ca fonctionne tout autant, c'est plus simple et plus rapide !!!!!!

Christophe R

Gobillot · Answer

Dim i As Integer

i= 32767
'pourquoi faire simple quand on peut faire compliqu&#233;
For i = 0 To 32767 - 1
Next i
MsgBox i

Daniel

Nombre de caractères

10 réponses

Discussions similaires