Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

une boucle with combobox

  • Initiateur de la discussion Initiateur de la discussion steven
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

steven

Guest
bonjour tout le monde

soynons bref, en fait je veux alimenter +ieurs combobox avec les mémes données, mais j'arrive pas avec la boucle cidessous;
les combobox contient les jours de 01.....31


For k = 1 To 5 'k est impaire
With Controls('ComboBox' & k)
For i = 1 To 9
.AddItem '0' & i
Next
For a = 10 To 31
.AddItem a
Next a
End With
k = k + 2
 
Salut Steven,

Tout d'abord première chose, la boucle que tu veux faire ne fonctionne que si tu travails sur un USF, et je viens de la tester chez moi et elle fonctionne. Tu peux seulement modifier légèrement le code en mettant la ligne suivante
Code:
For k = 1 To 5 Step 2
à la place de ton k=k+2.
Dernière chose, il manque un Next k à la fin de code.

Je te joint le fichier que j'ai fais pour tester ton code au cas ou. Pour remplir les combo, il faut appuyer sur le bouton du USF.

[file name=Steven.zip size=9405]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Steven.zip[/file]

@+
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
4
Affichages
735
Réponses
15
Affichages
791
Réponses
3
Affichages
333
Réponses
5
Affichages
418
Réponses
3
Affichages
924
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
523
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…