[VBA-E] Gestion ComboBox

Gestion ComboBox [VBA-E] - VB/VBA/VBS - Programmation

Marsh Posté le 31-07-2006 à 09:25:28    

Bonjour tout le monde !!
 
Allez pour ce début de semaine, trois petites questions sur les combobox...
 
1/ Comment faire pour que les valeurs restent enregistrées dans la combobox même lorsque je quitte le prog. Je m'explique : la combobox contient des noms des fichiers. Or quand je quitte excel et que je le relance, ma liste est vide. Il ne me reste plus qu'un nom, visiblement le nom sur lequel j'ai cliqué en dernier
 
2/ Ce qui m'amène à la deuxième question : Comment faire pour que la valeur titre apparaissant dans la combobox soit toujours la même. Là la valeur qui reste c'est la dernière valeur sur laquelle j'ai cliqué...
 
3/ Dernière question : Quand je n'ai qu'une valeur dans ma combobox, si je clique dessus rien ne se passe... comment faire !?
 
Désolé pour ce flot de question, mais je me suis arraché les cheveux vendredi sans réponse... et là j'en ai marre  :cry:  
 
Merci d'avance pour votre aide

Reply

Marsh Posté le 31-07-2006 à 09:25:28   

Reply

Marsh Posté le 31-07-2006 à 09:36:36    

Salut,
1/ tu enregistres toutes les valeurs qui apparaissent dans ta combo avant de quitter, sur une feuille annexe. Et tu la recharges a chaque ouverture de fichier.
 
2/ Lors du Initialize tu impose la valeur de ta combobox
 
3/ Pas compris la question... Comment ca rien ne se passe ?

Reply

Marsh Posté le 31-07-2006 à 10:02:13    

jpcheck a écrit :

Salut,
1/ tu enregistres toutes les valeurs qui apparaissent dans ta combo avant de quitter, sur une feuille annexe. Et tu la recharges a chaque ouverture de fichier.
 
2/ Lors du Initialize tu impose la valeur de ta combobox
 
3/ Pas compris la question... Comment ca rien ne se passe ?


 
 
1/ pas pratique ce truc... menfin ainsi va la vie !!
 
2/ J'ai pas trop compris comment ça marchait le Initialize
 
3/ Normalement, lorsque je sélectionne un élément de la liste du combobox en cliquand dessus, alors il se lance une sub. Par contre lorsque ma combobox ne contient qu'un élément, si je clique dessus, rien ne se passe, la sub ne se lance pas.
 

Reply

Marsh Posté le 31-07-2006 à 10:06:47    


1/ quand je dit feuille annexe, tu le mets sur une des feuilles de ton workbook bien sûr.
2/Initialize se déclenche lors du .Show de ton UserForm
3/ tu peux nous montrer ta sub stp ?

Reply

Marsh Posté le 31-07-2006 à 10:15:44    

jpcheck a écrit :

1/ quand je dit feuille annexe, tu le mets sur une des feuilles de ton workbook bien sûr.
2/Initialize se déclenche lors du .Show de ton UserForm
3/ tu peux nous montrer ta sub stp ?


 
1/ Ouais t'inquiète j'avais compris !! De toute façon j'ai déjà une colonne qui se rempli des noms de fichiers que l'on retrouve dans la combobox donc ça va pas ête compliqué !
 
2/ J'ai pas de userform !! ma combobox est directement sur ma feuille. Est-ce que je peux affecter une valeur à combobox.value après chaque clic, une fois la valeur cliquée récupérée
 
3/
La sub qui est sur ma feuille
 
Private Sub ComboBox_EditionPV_Click()
 
    PVaEditer = Worksheets("Commandes" ).ComboBox_EditionPV.Text
     
    EditionPV.EditionPV
   
End Sub

 
 
Puis le module editionPV
 
   NomFichierDepouillement = ActiveWorkbook.Name
     
    LignePV = Worksheets("Mesures" ).Cells.Find(What:=PVaEditer).Row
    ColonnePV = Worksheets("Mesures" ).Cells.Find(What:=PVaEditer).Column
     
    NomPV = ("PV - " & Worksheets("Mesures" ).Cells(LignePV + 2, 2).Value)
    Sheets("PV Vierge" ).Copy
     
    PathNomPV = Application.GetSaveAsFilename(NomPV & ".xls", "Fichiers Excel (*.xls), *.xls" )
     
    If PathNomPV = "Faux" Then
        Application.DisplayAlerts = False
        Workbooks(2).Close
        Application.DisplayAlerts = True
        End
    End If
 
.........

 

Reply

Marsh Posté le 01-08-2006 à 10:13:59    

surikat14 a écrit :

1/ pas pratique ce truc... menfin ainsi va la vie !!
 
2/ J'ai pas trop compris comment ça marchait le Initialize
 
3/ Normalement, lorsque je sélectionne un élément de la liste du combobox en cliquand dessus, alors il se lance une sub. Par contre lorsque ma combobox ne contient qu'un élément, si je clique dessus, rien ne se passe, la sub ne se lance pas.


 
 
1/ Bon pour le un, c'est bon
 
2/ & 3/ En fait j'affecte une valeur à combobox.valeu à chaque fin de procédurer pour avoir un titre à ma combobox constant. Dans le coup, même avec une seule valeur dans ma combobox, ça marche !!
Par contre, je ne sais pas si c'est très propre comme prog...
 

Reply

Marsh Posté le 04-08-2006 à 11:14:07    


 :hello:  :hello:  :hello:  
 
Nouvelle question sur les combobox  :ange:  
 
J'ai donc une combobox dans un userform. Tout se passe bien sauf lorsque je clique sur la croix pour fermer cette combobox. En effet, lorsque je la re-ouvre, ma combobox est alors vide... why !?  :??:  
Faut-il que je remplisse ma combobox à chaque fois que j'ouvre le userform ??
 
 :jap:

Reply

Marsh Posté le 04-08-2006 à 11:19:01    

surikat14 a écrit :

:hello:  :hello:  :hello:  
 
Nouvelle question sur les combobox  :ange:  
 
J'ai donc une combobox dans un userform. Tout se passe bien sauf lorsque je clique sur la croix pour fermer cette combobox. En effet, lorsque je la re-ouvre, ma combobox est alors vide... why !?  :??:  
Faut-il que je remplisse ma combobox à chaque fois que j'ouvre le userform ??
 
 :jap:


mets le dans l'evenement initialize de ta Usf oui

Reply

Marsh Posté le 04-08-2006 à 11:25:29    

jpcheck a écrit :

mets le dans l'evenement initialize de ta Usf oui


 
C'est bizarre ce phénomène...
L'initialize marche au poil [:alucard]
 
 :jap: bien !!
 

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed