n° du charactère "_"

[sylv900]

bonjour
je n'ai pas trouvé de table d'équivalence,
est-ce quelqu'un peut me donner le n° de '_'
pour pouvoir compter le nombre de '_' avec un code du genre
instr(ligne, chr(?)

merci

 

[PascalXLD]

Re:n° du charactère \"_\"

Bonjour

95 je pense

La table d'équivalence tu l'as dans l'aide de VBA

Bonne journée

Message édité par: Pascal76, à: 26/10/2005 15:56

 

[GIBI]

Bonjour,


pour avoir la valeur du code il suffit d'utiliser la formule =CODE('_')

 

[sylv900]

ok merci
par contre je pensais que instr comptait le nombre de caractère présent dans la chaine mais non, quel est le code?
merci

 

[_Thierry]

Bonjour Sylvie, Pascal, Gibi, le Forum

Bon en VBA voici deux procédures pour le prix d'une !!!

Sub List_All_ANSI_Chr()
Dim i As Integer

For i = 1 To 255
    Cells(i, 1) = 'Code ' & i & '='
    Cells(i, 2) = Chr(i)
Next

End Sub

Sub Longeur_Chaine_de_Caractères()
Dim MySTring As String

MySTring = 'par contre je pensais que Instr comptait le nombre de caractère présent dans la chaine mais non, quel est le code?'

MsgBox 'La Chaine Contient ' & Len(MySTring) & ' Caractères'
MsgBox 'Il y a ' & InStr(1, MySTring, 'Instr') & ' Caractères placés AVANT le mot ''Instr'''
MsgBox 'Il y a ' & Len(Mid(MySTring, InStr(1, MySTring, 'Instr'))) - Len('Instr') & ' Caractères placés APRES le mot ''Instr'''

End Sub

Bon Aprèm
[ol]@+Thierry[/ol]

 

[GIBI]

bonjour,



INSTR donne la position d'un caractère dans une chaine

exemple p= InStr(1, Lib, 'TOTO') p= postion de toto dans Lib

LEN donne le nombre de caracatères

 

[sylv900]

ca d'accord mais on ne s'est pas bien compris, désolé
je cherche le nombre de caractère particulier dans un chaine,
exemple :
chaine = 'aaabbcccdddd'
fonction(chaine, 'a') renvoi 3
fonction(chaine, 'b') renvoi 2
fonction(chaine, 'ac') renvoi 3
fonction(chaine, 'd') renvoi 4
quel est cette fonction?
merci à tous