[ VBA ] - Combobox vide à l'ouverture d'excel

Résolu
anyah Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   -  
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

J'ai un petit problème avec ma combobox en vba, j'aimerais que lorsque j'ouvre ma feuille excel (2000) aucun choix ne soit prédéfinipour mon combobox. je ne sais pas si il existe une propriété directe dans la fenetre propriété ou si il existe une fonction vba.

merci
A voir également:

10 réponses

Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

Je ne comprends pas trop ce que tu veux dire mais je pense que ComboBox1.Text ="" devrait suffir.

;o)
-1
anyah Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   6
 
en fait a l'ouverture de mon fichier excel pour le combobox, un des choix de la liste déroulante est prédéfini
je vouidrai qu'il n'y ai pa de choix prédéfini que celui paraisse vide a l'ouverture de la page ce ne serait qu'en appuyant sur la petite fleche a coté que les choix apparaitraient.

je vais essayer ta méthode...
-1
anyah Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   6
 
je viens d'essayer ca ne marche pas il fait une erreur sur la ligne g aussi essayer .value ca ne marche pas non plus
-1
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Supprime la ligne qui défini la préselection. Ca doit être un truc comme ça : ComboBox1.ListIndex = 1 et mets à la place ComboBox1.Text = ""

;o)
-1

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
anyah Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   6
 
j'utilise un select ca me donne ca :

Private Sub CBx_LH_Outer_Change()
Select Case CBx_LH_Outer.ListIndex
Case 0
Range("I12").Value = Sheets("General data").Range("C13").Value
Range("L12").Value = Sheets("General data").Range("D13").Value
Range("O12").Value = Sheets("General data").Range("E13").Value
Case 1
Range("I12").Value = Sheets("General data").Range("C14").Value
...
end sub

et j'ai aussi une procédure worksheet_activate()
-1
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Ok c'est la procédure évènement de la combobox ... il faut regarder dans l'initialisation de ta combobox.

Mets ton fichier sur https://www.cjoint.com/ et viens coller le lien ici, stp.

Enlève toutes les infos confidentielles avant.

;o)

-1
anyah Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   6
 
je vais pa pouvoir pa le droit d'envoyer comme ca des données....dsl :(
-1
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Tu enlèves toutes les données et tu n'envoies que le code ...

;o)
-1
anyah Messages postés 58 Date d'inscription   Statut Membre Dernière intervention   6
 
c'est trop compliqué a part copier le morceau de code de tout a l'heure dans le corps du message c'est pa possible c'est pas grave je ferai sans merci quand même
-1
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Je comprends ... mais tu ne dois pas avoir que ce bout de code ... tu peux faire des copier/coller des modules de code et les faire passer si tu veux.
-1