Remplir Combo en VBA

tototiti2008

XLDnaute Barbatruc

• 22 Octobre 2008

• #2

Re : Remplir Combo en VBA

Bonjour benjisan,

si tu ajoutes une combobox avec la Boite à outils contrôles, c'est exactement ce que tu cherches, à priori.

Menu affichage - Barres d'outils - Boite à outils contrôles

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 22 Octobre 2008

• #3

Re : Remplir Combo en VBA

Bonjour Benjisan, Tototiti

regarde peut être le code ci dessous, à placer dans un module standard :

Code:

Sub test()
With Sheets("Feuil1").ComboBox1
    .Clear
    .AddItem "cccc"
    .AddItem "bbbb"
    .AddItem "aaaa"
    .AddItem "zzzz"
End With
End Sub

bon après midi
@+

 

Vote positif 0 Vote négatif

B

benjisan

Guest

• 22 Octobre 2008

• #4

Re : Remplir Combo en VBA

Oui pour dessiner la combo il n'y a pas de problème.

C'est pour la remplir en VBA

 

Vote positif 0 Vote négatif

B

benjisan

Guest

• 22 Octobre 2008

• #5

Re : Remplir Combo en VBA

Merci pour vos réponse,

Malheureusement cela ne fonctionne pas, j'ai placé le code dans un module et j'ai affecté une macro à la combo, mais il ne passe même pas dans mon module.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 22 Octobre 2008

• #6

Re : Remplir Combo en VBA

Re

regarde le fichier joint, tu click sur le bouton, cela alimente la combo.

bonne soirée
@+

 

Pièces jointes

• classeur1.zip

  10 KB · Affichages: 77
• classeur1.zip

  10 KB · Affichages: 72
• classeur1.zip

  10 KB · Affichages: 66

Vote positif 0 Vote négatif

B

benjisan

Guest

• 22 Octobre 2008

• #7

Re : Remplir Combo en VBA

Hello Pierrot93,

C'est impec, c'est vrai ça que je cherche à faire mis à part que je souhaite quel se charge automatiquement au chargement de la sheet.

Maintenant j'ai une autre question, comment est ce que je peux faire pour arriver à avoir accés à ta combo car je ne parviens même pas à cliquer avec le bouton droit de la souris pour moi avoir les propriété

Encore un énorme merci à toi

 

Vote positif 0 Vote négatif

B

benjisan

Guest

• 22 Octobre 2008

• #8

Re : Remplir Combo en VBA

En gros je ne comprends pas comment tu arrives à ajouter la combo.
Moi je passe par la barre Formulaire mais elle est différente de la tienne

Encore merci

Bonne soirée

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 22 Octobre 2008

• #9

Re : Remplir Combo en VBA

Re

fichier modifié, code placé dans l'événement activate de la feuil1. Pour voir les propriétés de la combo, passe en mode création, pour cela click sur l'icone "mode création" de la barre d'outils visual basic (equerre bleeu), ensuite click droit sur l'objet => propriété.

@+

 

Pièces jointes

• classeur1.zip

  8.7 KB · Affichages: 68
• classeur1.zip

  8.7 KB · Affichages: 66
• classeur1.zip

  8.7 KB · Affichages: 65

Vote positif 0 Vote négatif

B

benjisan

Guest

• 22 Octobre 2008

• #10

Re : Remplir Combo en VBA

Il y a quelques choses que je ne comprends pas très bien, il faut que le focus soit sur ma combo pour afficher toutes les lignes de la combo.

Si par exemple je clique sur mon formulaire et que je reclique sur ma combo il affiche la première ligne avec une petite flèche en haut et en bas

Je vais joindre mon fichier se sera plus facile

Encore merci à tous

 

Pièces jointes

• test.xls

  28 KB · Affichages: 84
• test.xls

  28 KB · Affichages: 83
• test.xls

  28 KB · Affichages: 84

Vote positif 0 Vote négatif

skoobi

XLDnaute Barbatruc

• 22 Octobre 2008

• #11

Re : Remplir Combo en VBA

Bonsoir benjisan,

ceci devrait marcher:

Code:

Private Sub ComboBox1_[B]Click[/B]()
If ComboBox1.ListIndex = -1 Then test
End Sub

 

Vote positif 0 Vote négatif

B

benjisan

Guest

• 22 Octobre 2008

• #12

Re : Remplir Combo en VBA

Merci Skoobi,

Ca fonctionne nickel

Encore un grand merci et bonne soirée à tous

Benjisan

 

Vote positif 0 Vote négatif