Inscrire caption de checkbox dans un userform [Résolu]

Messages postés
91
Date d'inscription
vendredi 15 janvier 2010
Statut
Membre
Dernière intervention
19 octobre 2012
- - Dernière réponse : titeuf136
Messages postés
91
Date d'inscription
vendredi 15 janvier 2010
Statut
Membre
Dernière intervention
19 octobre 2012
- 10 nov. 2011 à 20:27
Bonsoir

A l'aide d'une oucle je souhaite modifier le texte (caption) de case à cocher (Checkbox). Les cases à cocher se trouve dans un userform. Les données sources se trouvent sur une feulle excel.

Voici mon code

Private Sub UserForm_Initialize()

Set f1 = Sheets("essai")

'''' fonctionne
'For j = 6 To 8
'UserForm1.Controls("TextBox" & j - 5).Value = f1.Cells(9, j).Value
'Next j

Set f1 = Sheets("essai")
For i = 6 To 8
UserForm1.Controls("Checkbox" & i - 5).Caption = f1.Cells(9, i).Value
Next i

End Sub


Merci d'avance pour votre aide
Afficher la suite 

2 réponses

Meilleure réponse
Messages postés
18039
Date d'inscription
lundi 7 décembre 2009
Statut
Modérateur
Dernière intervention
11 avril 2018
209
3
Merci
Bonjour,
je ne vois rien qui "clocherait" dans ce code, si ce n'est l'absence du "typage" de f1, du genre :
Dim f1 as worksheet

A condition, bien évidemment que les checkboxes CheckBox1, checkbox2 et checkbox3 exçistent et soient directement sur ton userform.

____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 135 internautes nous ont dit merci ce mois-ci

Commenter la réponse de ucfoutu
Messages postés
91
Date d'inscription
vendredi 15 janvier 2010
Statut
Membre
Dernière intervention
19 octobre 2012
0
Merci
... bah du coup ça marche ! Merci !
Commenter la réponse de titeuf136