extraire une chaine

P

Pascal76

Guest

• 4 Décembre 2003

• #2

Bonjour Ben

avec les différentes "fonctions" de vba ci-dessous tu peux récupérer tes chaînes

Characters.Count
Right
Left

L'aide de vba est bien fourni sur cela

Peut-être y a t'il plus simple mais en comptant tes caractères et en prenant tes x (nombre de caractères) - 4 (ton .txt) à gauche tu as récupéré le nom de ton fichier. Les espaces comptent pour 1 caractère

Bon courage

Pascal

 

Vote positif 0 Vote négatif

B

ben

Guest

• 4 Décembre 2003

• #3

c'est bon j'ai trouvé j'ai fais :

chaine = len (ma variable)
chaine= chaine - 4
resultat = mid(ma variable, 1 , chaine)


c'était tout bête

merci !!

 

Vote positif 0 Vote négatif

P

Pascal76

Guest

• 4 Décembre 2003

• #4

Content que tu es trouvé
En plus je ne connaissais pas la fonction Mid alors c'est encore cela d'appris aujourd'hui

@ +

Pascal

 

Vote positif 0 Vote négatif

J

JPM

Guest

• 4 Décembre 2003

• #5

Salut à tous

Tu peut aussi chercher le point avec instr
Texte = Toto.txt
T = instr(1,Texte,".")
T = 4
Fich = Mid(Texte,0,T)

A+ JPM

 

Vote positif 0 Vote négatif

J

JPM

Guest

• 4 Décembre 2003

• #6

Attend le T= 4 et le résultat de la ligne du dessus

Excuse

A+ JPM

 

Vote positif 0 Vote négatif

B

ben

Guest

• 5 Décembre 2003

• #7

Merci JPM pour ton autre solution, et je suis content d'avoir apris un truc a pascal c'est la première fois lol

 

Vote positif 0 Vote négatif