extraction de caractères d'une chaineRésolu

Question

Salut,
Si j'ai par exemple une chaine de caractère J2 et une chaine de caractère J15. Je ne voudrai garder que le 2 et le 15. Comment éliminer le J? Merci beaucoup!!!

cs_JMO · Accepted Answer

Bonjour à tous

Tout simplement avec Mid.

var1="J1"
var2="J15"
MsgBox Mid(var1,2) &vbCr& Mid(var2,2)

jean-marc

hvb · Answer

avec un bete Mid.
Si tu es sur de la syntaxe, tu met les arguments en dur : 
MsgBox(Mid("J15",2,2))

sinon tu fais ça : 
        Dim s As String = "J38"
        Dim s2 As String = "J"
        MsgBox(Mid(s, InStr(s, s2) + 1, Len(s) - InStr(s, s2)))

HvB a.k.a BaTo ^^x 
http://chat.batto.info/ ^^'
http://batto.info/

hvb · Answer

arf post croisé, et déja accepté... 
suis au taf, j'ouvre bcp de fenetres ^^

HvB a.k.a BaTo ^^x 
http://chat.batto.info/ ^^'
http://batto.info/

jrivet · Answer

Salut,
Ou bien aussi avec Replace.

Dim s As String
Dim s2 As String

s = "J1"
s2 = "J15"

MsgBox Replace(s, "J", "") & " " & Replace(s2, "J", ""), ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

jmfmarques · Answer

Bonjour Julien,

Ta réponse avec Mid est parfaite.
Celle avec Replace fonctionne bien évidemment mais est du gaspillage ...
Ne la recommande surtout pas !

cs_JMO · Answer

Re,

Complément d'information pour [auteurdetail.aspx?ID=703407 hela_bouks]

La fonction Mid renvoie un nombre spécifié de caractères d'une chaîne.

Synthaxe: Mid(string, start[, length])

string
Expression de chaîne à partir de laquelle les caractères sont renvoyés. 
Si l'argument string contient Null, la valeur Null est renvoyée. 

start 
Position du caractère dans l'argument string à partir duquel commence 
la partie à extraire. Si l'argument start est supérieur au nombre de 
caractères contenus dans l'argument string, la fonction Mid renvoie 
une chaîne de longueur nulle. 

length 
Nombre de caractères à renvoyer. Si cet argument est omis ou si le nombre 
de caractères dans le texte (y compris le caractère à l'argument start) 
est inférieur à ceux compris dans l'argument length, tous les caractères 
entre la position de l'argument start et la fin de la chaîne sont renvoyés. 

Notes:
Pour déterminer le nombre de caractères contenus dans l'argument string, 
utilisez la fonction Len.
-------------------------------------------------------------------------
L'exemple ci-dessous utilise la fonction Mid pour renvoyer 3 caractères à 
partir du quatrième, dans une chaîne : 

Dim MyVar
MyVar = Mid("12345678", 4, 3) ' MyVar contient "456".

L'exemple ci-dessous utilise la fonction Mid pour tous les caractères à 

partir du quatrième, dans une chaîne :

Dim MyVar
MyVar = Mid("12345678", 4) ' MyVar contient "45678".

Voir aussi
Left, fonction | Len, fonction | LTrim, RTrim et Trim, fonctions | Right, fonction

jean-marc

hela_bouks · Answer

merci beaucoup pour votre aide
    la fonction Mid(nom de la chaine,2) a parfaitement répondu à ma question

Extraction de caractères d'une chaine

7 réponses

Votre réponse

Discussions similaires