Aide pour Fonction LEFT [Résolu]

Signaler
Messages postés
25
Date d'inscription
jeudi 20 janvier 2005
Statut
Membre
Dernière intervention
14 mars 2006
-
Messages postés
25
Date d'inscription
jeudi 20 janvier 2005
Statut
Membre
Dernière intervention
14 mars 2006
-
Bonjour,
j'ai un petit probleme, je n'arrive pas à faire marcher la fonction Left comme je le désirerais.
J'ai une combo rempli par les éléments suivants :
700 - test1
800 - test2
etc...
Et quand je sélectionne un de ces éléments, j'aimerais qu'il n'y est que le chiffre qui apparaisse dans la valeur de ma combo, c'est à dire 700 (par exemple). Le probleme c'est que la taille du chiffre est aléatoire et ne se limite donc pas à 3 caractères. Donc je pensais me servir du tiret mais je ne sais absolument pas comment arriver à faire cela.
Merci d'avance !

3 réponses

Messages postés
626
Date d'inscription
samedi 28 septembre 2002
Statut
Membre
Dernière intervention
18 mai 2009
3
Dim a As Integer
Dim result As Integer

a = InStr(1, combo.text, "-", vbTextCompare)
result = Mid(combo.text, 1, a - 2)

Ca doit ressembler à quelque chose comme ça.
Si tu n'a pas tous les chiffre, modifie les valeur de Mid( )

..::DuKe::..
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 108 internautes nous ont dit merci ce mois-ci

Messages postés
1471
Date d'inscription
mardi 5 février 2002
Statut
Membre
Dernière intervention
20 octobre 2014
10
result=val(combo.text) te rendra ton chiffre aussi.

BasicInstinct
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 108 internautes nous ont dit merci ce mois-ci

Messages postés
25
Date d'inscription
jeudi 20 janvier 2005
Statut
Membre
Dernière intervention
14 mars 2006

Merci à vous deux ça marche !