Gestion label etiquettes en boucle
Résolu
JVE-Prof
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
JVE-Prof Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
JVE-Prof Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
Pour Access 2010 comment faire référence à un label (étiquette)
Dans le but d'avoir un nom indexable(i)
Exemple le Nom du label1 est représenté par Info(1)
Label2 est représenté par Info(2) .....
Modifier en boucle les label couleur, text
Merci d'avance
Dans le but d'avoir un nom indexable(i)
Exemple le Nom du label1 est représenté par Info(1)
Label2 est représenté par Info(2) .....
Modifier en boucle les label couleur, text
Merci d'avance
A voir également:
- Gestion label etiquettes en boucle
- Www.printpratic.fr etiquettes - Télécharger - Photo & Graphisme
- Logiciel gestion locative gratuit excel - Télécharger - Comptabilité & Facturation
- Logiciel gestion photo gratuit - Guide
- Label printer logiciel - Télécharger - Outils professionnels
- Gestion de fichiers - Télécharger - Gestion de fichiers
2 réponses
Bonjour,
exemple: change couleur de fond des labels
exemple: change couleur de fond des labels
Private Sub Commande4_Click()
For x = 1 To 3
Me.Controls("info(" & x & ")").BackColor = vbGreen
Next x
End Sub
Je vous remercie pour votre précieuse aide, vous m'avez ouvert les yeux.
Voici le résultat auquel je suis arrivé.
Dim lbl_Copie_Ville(5) As Label
Dim cmd_Copie_Sélect(5) As CommandButt
Nom de la variable intermédiaire Nom du Label
Set lbl_Copie_Ville(1) = lbl_Ville_1
Set lbl_Copie_Ville(2) = lbl_Ville_2
Set lbl_Copie_Ville(3) = lbl_Ville_3
Set lbl_Copie_Ville(4) = lbl_Ville_4
Set lbl_Copie_Ville(5) = lbl_Ville_5
Nom de la variable intermédiaire Nom du bouton
Set cmd_Copie_Sélect(1) = cmd_Sélection_1
Set cmd_Copie_Sélect(2) = cmd_Sélection_2
Set cmd_Copie_Sélect(3) = cmd_Sélection_3
Set cmd_Copie_Sélect(4) = cmd_Sélection_4
Set cmd_Copie_Sélect(5) = cmd_Sélection_5
Encore un grand merci .
Voici le résultat auquel je suis arrivé.
Dim lbl_Copie_Ville(5) As Label
Dim cmd_Copie_Sélect(5) As CommandButt
Nom de la variable intermédiaire Nom du Label
Set lbl_Copie_Ville(1) = lbl_Ville_1
Set lbl_Copie_Ville(2) = lbl_Ville_2
Set lbl_Copie_Ville(3) = lbl_Ville_3
Set lbl_Copie_Ville(4) = lbl_Ville_4
Set lbl_Copie_Ville(5) = lbl_Ville_5
Nom de la variable intermédiaire Nom du bouton
Set cmd_Copie_Sélect(1) = cmd_Sélection_1
Set cmd_Copie_Sélect(2) = cmd_Sélection_2
Set cmd_Copie_Sélect(3) = cmd_Sélection_3
Set cmd_Copie_Sélect(4) = cmd_Sélection_4
Set cmd_Copie_Sélect(5) = cmd_Sélection_5
Encore un grand merci .
J'ai omis de signaler mon deuxième problème
L' attribution < d' un nom / une variable ...) a un label, pour modifier l'une <Label>par l'intermédiaire de l'autre <variable de référence>.
Je ne suis pas arrivé à contourner l'indexation du nom d' un label, par exemple Label(1) devient Label_1_ ?
Est il possible par une instruction < Set, New... ou autre ?> Affecter « une variable indexée ou non » à un label, par exemple la variable XY(i) serait utilisée comme suit Me.XY(1).BackColor = RGB (250,0,0) et que se soit le Label1 qui change de couleur
XY(2) pour un autre Label, etc.
D'avance un grand merci. Jve
Je ne suis pas arrivé à contourner l'indexation du nom d' un label, par exemple Label(1) devient Label_1_ ? comprends pas, vos labels ont quels noms ??????
Variable contenant le nom du label1
XY(1)=nom_du_label1.name