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

Une classe de ComboBox

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 !

Bourakrak

XLDnaute Nouveau
Bonjour le forum,

J'essaie de créer une classe de ComboBox, mais évidemment, ça ne marche pas.
J'avais trouvé sur internet un exemple avec des TextBox, j'ai donc adapté pour mon cas, mais il me sort soit une incompatibilité de type, soit que la méthode n'est pas utilisable, et ce toujours sur la ligne

Code:
Set BoxClasse(boucleur).CmbBox = UserForm1.Controls("ComboBox" & boucleur)

J'avoue ne pas être habitué aux classes en vba (première fois que je m'en sers, en fait).
Si ça se trouve, c'est ma version d'excel (2003) qui m'en empêche...

Quelqu'un aurait une idée ?

Merci.

Bourakrak
 

Pièces jointes

Re : Une classe de ComboBox

Salut Bourakrak, le Forum

Pas sur d'avoir compris mais essaye dans l'initialize de L'USF

Option Explicit
Dim boucleur As Integer

Private Sub Userform_Initialize()
For boucleur = 1 To 12
Me.Controls("ComboBox" & boucleur) = "No reply/Delete reply"
Next boucleur
End Sub

a Tester

Bonne Journée
 

Pièces jointes

Re : Une classe de ComboBox

Bonjour et merci pour ta réponse, Dull.

Effectivement, ça marche en mettant la commande dans l'Initialize, mais seulement dans mon fichier exemple...
Dans mon véritable fichier, j'ai une erreur d'incompatibilité de type sur
Code:
UserForm1.Show

Je joint mon fichier original (plus complexe, mais c'est là que j'ai une erreur).

Merci
 

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

Discussions similaires

L
Réponses
0
Affichages
1 K
L
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…