[Résolu] - [VBA/Excel] Boucler sur les contrôles d'un UserForm

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : [Résolu] - [VBA/Excel] Boucler sur les contrôles d'un UserForm

dough29

Bonjour et merci à ceux qui prêterons attention à mon post.

Voilà j'ai un classeur Excel dans lequel j'ai créé un UserForm avec plusieurs contrôles.

On va dire que mes contrôles sont de type label ainsi nommés: MonLabel1, MonLabel2, ..., MonLabel6

J'ai un autre contrôle, une scrollbar allant de 1 à 6 et j'aimerais qu'au changement de la valeur de la scroll, mes MonLabelX apparaissent/disparaissent. C'est là où je pêche.

J'ai essayé ceci:

Code :

Private Sub MonScroll_Change()
Dim i As Integer
For i = MonScroll.Min To MonScroll.Value
MonLabel & i & .Visible = True
Next i
For i = MonScroll.Value + 1 To MonScroll.Max
MonLabel & i & .Visible = False
Next i
End Sub

Cela ne donne aucun résultat mis à part une erreur...

Voilà j'espère trouver mon sauveur parmis vous.

Merci d'avance tchusss !!

Message édité par dough29 le 16-06-2005 à 09:22:36

Publicité

AlainTech

Pas trouvé? Cherche encore!

Private Sub MonScroll_Change()
Dim i As Integer
Dim sLabelName As String
For i = MonScroll.Min To MonScroll.Value
sLabelName = "MonLabel" & i
Controls(sLabelName).Visible = True
Next i
For i = MonScroll.Value + 1 To MonScroll.Max
sLabelName = "MonLabel" & i
Controls(sLabelName).Visible = False
Next i
End Sub

Et voilà.

dough29

Merci beaucoup !!

Je viens d'essayer ca me convient à merveille.

Bonne soirée ! :bounce:

FORUM HardWare.fr

Programmation

VB/VBA/VBS

[Résolu] - [VBA/Excel] Boucler sur les contrôles d'un UserForm

Sujets relatifs
Problèmes avec un chiffre à virgule [résolu]	[resolu] Positionnement Vertical
Probleme super etrange de tableaux superposés [resolu]	[RESOLU] Personnaliser la barre de menu Access
[PHP] Supprimer mot de 3 caractères maxi dans une chaine - RESOLU	Commande pour fermer excel ? VBA
Modifier le style dans une fonction (résolu)	Faire la somme de plusieurs cellules VBA
[Excel - Graph] Correspondance entre 2 séries d'un même graph
Plus de sujets relatifs à : [Résolu] - [VBA/Excel] Boucler sur les contrôles d'un UserForm

Page générée en 0.041 secondes