Chaines de caractères VBA

choco_ben -  
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour à tous,

Voici mon problème :

J'ai une chaine de caractère dans un combobox composé d'un code point de vente et d'un nom d'agence. (Exemple : _
134567 - MARCHAND
1111123234 - PASCAL
1234 - CHARLES )
Je souhaiterais avoir dans une variable appelé agence, uniquement le code point de vente (A noter que celui-ci possède une dimension variable).
Il faudrait par conséquent que je prélève en partant de la gauche tous les caractères différents d'un espace. Par exemple je voudrais que agence = "134567" sans le PASCAL si l'utilisateur a sélectionné ce point de vente dans le formulaire.
Je ne sais pas comment m'y prendre ...

merci d'avance pour vos réponses !

A voir également:

2 réponses

Réponse 1 / 2
swed
 
Bonjour,
Il faudrait procéder en deux étapes :

1 - utiliser la fonction inStr() pour trouver la position du premier caractère espace dans la chaine
2 - utiliser la fonction left() pour récupérer les X premiers caractères de la chaine (en fonction de la position de l'espace)

Cordialement, M.
0
Réponse 2 / 2
lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
Peut-être comme ça ? 
Sub Test1()
Dim T As String, TB
Dim Agence As String
T = "1111123234 - PASCAL " 'Pour le test
    TB = Split(T, " "): Agence = TB(0)
End Sub

A+
0

Discussions similaires

Décryptage de chaînes précédées de '$'.
Cubde -
Rachid -

5 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
DECRYPTAGE DES CHAINES CRYPTES
A +++++++ -
madmyke -

2 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses