Création automatique de cases à cocher

[LUDWIG]

Bonjour,

Dans un formulaire vba, est-il possible (et comment ?) de créer des cases à cocher en fonction de données dans Excel;

Je m'explique.
Dans Excel, j'ai une colonne NOMS qui contient : George, Henri, Giselle.
je souhaite que mon formulaire qui s'ouvre possède les cases à cocher George, Henri et Giselle.

Si je rajoute un nom ('Roberta') dans la liste, je souhaite qu'à la prochaine ouverture, mon formulaire affiche George, Henri, Giselle et Roberta.

Sinon j'avais penser qu'il existait un contrôle spécial pour faire cela mais je ne sais pas lequel (style une liste déroulante basée sur ma liste de nom et qui contient une case à cocher pour chaque nom).

J'espère que ma question est claire. Merci d'avance de m'aider. A bientôt.

 

[ludocavic]

salut Ludwig,

J'ai fait pratiquement pareil pour des labels, je pense que pour des checkbox ca doit marcher aussi

Il faut mettre le code dans le Initialize du formulaire (ici Userform1) pour creer les controls avant de le charger!

Je sais pas si c'est optimisé, mais ca marche

Private Sub UserForm_Initialize()
Dim ctlNew As Control
ligne = 1
While (Range('a' & ligne)) <> ''
 ligne = ligne + 1
 Wend

 nbligne = ligne

ligne = 1

For i = ligne To nbligne ' nb de ligne a traiter
Range('a' & i).Select
If Selection <> '' Then
        Set ctlNew = UserForm1.Controls.Add('Forms.checkbox.1')
        ctlNew.Name = Selection
        ctlNew.Caption = Selection
        ctlNew.Top = 15 * i
        Else
End If
Next i
Load UserForm1
UserForm1.Show
End Sub

Mais je garantis rien!!

Jespere que ca pourra aider

A+

Message édité par: ludocavic, à: 31/08/2005 15:19