Discussion :

[nsqualli]

Bonjour,

si on a la chaine de caractere suivante: "prenom nom_rma mm-aa"

svp j'ai besoin d'une fonction qui va renvoyer dans une variable "vNom" la chaine "nom", en sachant que la partie prenom peut etre de taille variable.

Merci

[zandru]

Bonjour,

regarde avec la fonction instr pour trouver le premier symbole espace entre le nom et le prenom, puis le symbole "_".

Et ensuite utilise mid pour renvoyer la partie qui t'intéresse.

EDIT : ce qui donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
    chaine = "prenom nom_rma mm-aa"
    debut = InStr(1, chaine, " ", vbTextCompare) + 1
    fin = InStr(1, chaine, "_", vbTextCompare)
    nom = Mid(chaine, debut, fin - debut)

[nsqualli]

ça me donne une erreur d'execution a la ligne ou il y'a le mid

[peaceandloveman01]

Bizarre... Chez moi ça marche très bien. Tu peux nous donner le numéro de l'erreur et le texte stp ?

[nsqualli]

C'est erreur d'execution '5' :argument ou appel de procedure non incorrect
et lors du debogage, l'identificateur sous le curseur n'est pas reconnu

[nsqualli]

Bon c bon là ça marche, y'avait juste un fichier dans mon repertoire dont le nom n'est pas sous la meme forme que les autre.

Merci bcp a tous ceux qui m'ont aider et qui ont contribué

[Godzestla]

Bonjour,

avec split tu peux aussi le faire et je pense plus facilement:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
dim tablo()
tablo = split("prenom nom_rma mm-aa", "_")
chaine= tablo(0)
tablo = split(chaine, " ")
chaine = tablo(0)