SAISIR DANS UNE COMBO BOX
zcrew
Messages postés
231
Date d'inscription
lundi 23 février 2004
Statut
Membre
Dernière intervention
26 février 2010
-
7 août 2003 à 16:03
crac5517 - 4 mars 2013 à 17:13
crac5517 - 4 mars 2013 à 17:13
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/3013-saisir-dans-une-combo-box
https://codes-sources.commentcamarche.net/source/3013-saisir-dans-une-combo-box
4 mars 2013 à 17:13
J'ai une erreur sur combo1.text et pense que je l'aurai sur combo1.list
mais je suis largué.
Voici le message d'erreur.
"Méthode ou membre de données introuvable." (erreur462)
Quelqu'un a-t-il une idée ?
Merci d'avance et bonne semaine.
Christophe
7 mars 2007 à 10:57
Dans <dim pos,x as long>, n'est pas déclaré en tant que long, mais en tant que variant ! (type par defaut dans vb)
il faut écrire soi <Dim pos&, x as long> soi <Dim pos as long, x as long> (le caractère & permet de spécifier "historiquement" le type)
A+ Patrick
7 mars 2007 à 10:46
Bonne astuce, et simple de surcrois... une seul remarque :
en remplacant < if ucase(left(combo1.list(x),pos))=ucase(combo1.text) then >
par < if StrComp(Left(combo1.List(x),pos), Combo1.Text, vbTextCompare) = 0 Then>
tu gères même les carcatères spéciaux...
A+ Patrick
12 déc. 2006 à 17:51
Bravo !!
Si t'en a d'autres ... Merçi de partager !!!
7 août 2003 à 16:03