J'ai plusieurs étiquettes nommées A1, A2, A3, A4 ...
le contenu de l'étiquette (caption) est fonction d'une table et apparait au chargement du formulaire par le biais de ce code :
Do Until org.EOF x = x + 1 Me("A" & x).Visible = True Me("A" & x).Caption = org!zoom_org org.MoveNext Loop
ce qui donne par exemple: A1.caption="Bleu" A2.caption="vert" A3.caption="blanc" A4.caption="jaune" ...
Comment en VB si l'utilisateur clic sur A3 récupérer le contenu de l'étiquette c'est à dire: blanc
Dim MonString As String
MonString = MonLabel.Caption
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin mais comment repérer quelle étiquette a été sélectionner, y a t'il une fonction du style screen.activecontrol ?
Merci
-----Message d'origine----- Salut,
"Patrice"
J'ai plusieurs étiquettes nommées A1, A2, A3, A4 ...
le contenu de l'étiquette (caption) est fonction d'une table et apparait au chargement du formulaire par le biais de ce code :
Do Until org.EOF x = x + 1 Me("A" & x).Visible = True Me("A" & x).Caption = org!zoom_org org.MoveNext Loop
ce qui donne par exemple: A1.caption="Bleu" A2.caption="vert" A3.caption="blanc" A4.caption="jaune" ....
Comment en VB si l'utilisateur clic sur A3 récupérer le contenu de l'étiquette c'est à dire: blanc
Dim MonString As String
MonString = MonLabel.Caption
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
.
Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin
mais comment repérer quelle étiquette a été sélectionner,
y a t'il une fonction du style screen.activecontrol ?
Merci
-----Message d'origine-----
Salut,
"Patrice"
J'ai plusieurs étiquettes nommées A1, A2, A3, A4 ...
le contenu de l'étiquette (caption) est fonction d'une
table et apparait au chargement du formulaire par le biais
de ce code :
Do Until org.EOF
x = x + 1
Me("A" & x).Visible = True
Me("A" & x).Caption = org!zoom_org
org.MoveNext
Loop
ce qui donne par exemple:
A1.caption="Bleu"
A2.caption="vert"
A3.caption="blanc"
A4.caption="jaune"
....
Comment en VB si l'utilisateur clic sur A3 récupérer le
contenu de l'étiquette c'est à dire: blanc
Dim MonString As String
MonString = MonLabel.Caption
--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
Ta réponse répond en partie à mon besoin mais comment repérer quelle étiquette a été sélectionner, y a t'il une fonction du style screen.activecontrol ?
Merci
-----Message d'origine----- Salut,
"Patrice"
J'ai plusieurs étiquettes nommées A1, A2, A3, A4 ...
le contenu de l'étiquette (caption) est fonction d'une table et apparait au chargement du formulaire par le biais de ce code :
Do Until org.EOF x = x + 1 Me("A" & x).Visible = True Me("A" & x).Caption = org!zoom_org org.MoveNext Loop
ce qui donne par exemple: A1.caption="Bleu" A2.caption="vert" A3.caption="blanc" A4.caption="jaune" ....
Comment en VB si l'utilisateur clic sur A3 récupérer le contenu de l'étiquette c'est à dire: blanc
Dim MonString As String
MonString = MonLabel.Caption
-- A+ Pierre (3stone) Access MVP ----------------------------- http://users.skynet.be/mpfa -----------------------------
.
Raymond [mvp]
Bonjour.
Tu peux utiliser Screen.ActiveControl.Caption mais la Screen.PreviousControl.Caption n'existe pas. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:7d8f01c431a0$bedf9a70$ Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin mais comment repérer quelle étiquette a été sélectionner, y a t'il une fonction du style screen.activecontrol ?
Merci
Bonjour.
Tu peux utiliser Screen.ActiveControl.Caption
mais la Screen.PreviousControl.Caption n'existe pas.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:7d8f01c431a0$bedf9a70$a501280a@phx.gbl...
Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin
mais comment repérer quelle étiquette a été sélectionner,
y a t'il une fonction du style screen.activecontrol ?
Tu peux utiliser Screen.ActiveControl.Caption mais la Screen.PreviousControl.Caption n'existe pas. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:7d8f01c431a0$bedf9a70$ Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin mais comment repérer quelle étiquette a été sélectionner, y a t'il une fonction du style screen.activecontrol ?
Merci
merci Raymond, mais il ne s'agit que d'étiquettes sans contrôle lorsque l'utilisateur clic sur l'étiquette j'execute du VB je voudrais faire une fonction plutôt que de mettre ce VB sous chaque étiquette. Pour ce faire, je dois repérer quelle étiquette a été sélectée.
-----Message d'origine----- Bonjour.
Tu peux utiliser Screen.ActiveControl.Caption mais la Screen.PreviousControl.Caption n'existe pas. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de
news:7d8f01c431a0$bedf9a70$ Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin mais comment repérer quelle étiquette a été sélectionner, y a t'il une fonction du style screen.activecontrol ?
Merci
.
merci Raymond, mais il ne s'agit que d'étiquettes sans
contrôle
lorsque l'utilisateur clic sur l'étiquette j'execute du VB
je voudrais faire une fonction plutôt que de mettre ce VB
sous chaque étiquette.
Pour ce faire, je dois repérer quelle étiquette a été
sélectée.
-----Message d'origine-----
Bonjour.
Tu peux utiliser Screen.ActiveControl.Caption
mais la Screen.PreviousControl.Caption n'existe pas.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:7d8f01c431a0$bedf9a70$a501280a@phx.gbl...
Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin
mais comment repérer quelle étiquette a été sélectionner,
y a t'il une fonction du style screen.activecontrol ?
merci Raymond, mais il ne s'agit que d'étiquettes sans contrôle lorsque l'utilisateur clic sur l'étiquette j'execute du VB je voudrais faire une fonction plutôt que de mettre ce VB sous chaque étiquette. Pour ce faire, je dois repérer quelle étiquette a été sélectée.
-----Message d'origine----- Bonjour.
Tu peux utiliser Screen.ActiveControl.Caption mais la Screen.PreviousControl.Caption n'existe pas. -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de
news:7d8f01c431a0$bedf9a70$ Bonjour et merci Pierre
Ta réponse répond en partie à mon besoin mais comment repérer quelle étiquette a été sélectionner, y a t'il une fonction du style screen.activecontrol ?
Merci
.
Raymond [mvp]
Qu'appelles-tu "mais il ne s'agit que d'étiquettes sans contrôle" ? (je n'ai pas lu tous les posts) tu peux bien mettre une fonction (la même) dans l'événement sur clic de toutes tes étiquettes et dans cette fonction connaitre la légende de l'étiquette .caption ou le nom .name de l'étiquette active. tu peux même passer cet élément à la fonction dans les paramètres.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:7fda01c431a7$25f66260$ merci Raymond, mais il ne s'agit que d'étiquettes sans contrôle lorsque l'utilisateur clic sur l'étiquette j'execute du VB je voudrais faire une fonction plutôt que de mettre ce VB sous chaque étiquette. Pour ce faire, je dois repérer quelle étiquette a été sélectée.
Qu'appelles-tu "mais il ne s'agit que d'étiquettes sans contrôle" ? (je n'ai
pas lu tous les posts)
tu peux bien mettre une fonction (la même) dans l'événement sur clic de
toutes tes étiquettes et dans cette fonction connaitre la légende de
l'étiquette .caption ou le nom .name de l'étiquette active. tu peux même
passer cet élément à la fonction dans les paramètres.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:7fda01c431a7$25f66260$a001280a@phx.gbl...
merci Raymond, mais il ne s'agit que d'étiquettes sans
contrôle
lorsque l'utilisateur clic sur l'étiquette j'execute du VB
je voudrais faire une fonction plutôt que de mettre ce VB
sous chaque étiquette.
Pour ce faire, je dois repérer quelle étiquette a été
sélectée.
Qu'appelles-tu "mais il ne s'agit que d'étiquettes sans contrôle" ? (je n'ai pas lu tous les posts) tu peux bien mettre une fonction (la même) dans l'événement sur clic de toutes tes étiquettes et dans cette fonction connaitre la légende de l'étiquette .caption ou le nom .name de l'étiquette active. tu peux même passer cet élément à la fonction dans les paramètres.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:7fda01c431a7$25f66260$ merci Raymond, mais il ne s'agit que d'étiquettes sans contrôle lorsque l'utilisateur clic sur l'étiquette j'execute du VB je voudrais faire une fonction plutôt que de mettre ce VB sous chaque étiquette. Pour ce faire, je dois repérer quelle étiquette a été sélectée.
C'est ce que la boite à outils appelle intitulé C'est vrai que je peux mettre du vb ds chaque evènement sur clic du genre : libe = Me!C2.Caption Me!sous_org = libe Me!lis_def.RowSource = "SELECT Organe_def.Lib_defaut FROM Organe_def WHERE (((Organe_def.Lib_defaut) Like '* " & libe & " *')) WITH OWNERACCESS OPTION;"
Mais j'ai 18 etiquettes (intitulés), si c'était une zone de texte, je pourrais mettre: libe = Me!screen.activecontrol.Caption et utiliser une fonction c'est pourquoi je cherche s'il existe pour un intitulé une fonction du genre libe = Me!screen.activeIntitule.Caption Merci
-----Message d'origine----- Qu'appelles-tu "mais il ne s'agit que d'étiquettes sans contrôle" ? (je n'ai
pas lu tous les posts) tu peux bien mettre une fonction (la même) dans l'événement sur clic de
toutes tes étiquettes et dans cette fonction connaitre la légende de
l'étiquette .caption ou le nom .name de l'étiquette active. tu peux même
passer cet élément à la fonction dans les paramètres.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de
news:7fda01c431a7$25f66260$ merci Raymond, mais il ne s'agit que d'étiquettes sans contrôle lorsque l'utilisateur clic sur l'étiquette j'execute du VB je voudrais faire une fonction plutôt que de mettre ce VB sous chaque étiquette. Pour ce faire, je dois repérer quelle étiquette a été sélectée.
.
C'est ce que la boite à outils appelle intitulé
C'est vrai que je peux mettre du vb ds chaque evènement
sur clic du genre :
libe = Me!C2.Caption
Me!sous_org = libe
Me!lis_def.RowSource = "SELECT Organe_def.Lib_defaut FROM
Organe_def WHERE (((Organe_def.Lib_defaut) Like '* " &
libe & " *')) WITH OWNERACCESS OPTION;"
Mais j'ai 18 etiquettes (intitulés), si c'était une zone
de texte, je pourrais mettre:
libe = Me!screen.activecontrol.Caption
et utiliser une fonction c'est pourquoi je cherche s'il
existe pour un intitulé une fonction du genre
libe = Me!screen.activeIntitule.Caption
Merci
-----Message d'origine-----
Qu'appelles-tu "mais il ne s'agit que d'étiquettes sans
contrôle" ? (je n'ai
pas lu tous les posts)
tu peux bien mettre une fonction (la même) dans
l'événement sur clic de
toutes tes étiquettes et dans cette fonction connaitre la
légende de
l'étiquette .caption ou le nom .name de l'étiquette
active. tu peux même
passer cet élément à la fonction dans les paramètres.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le
message de
news:7fda01c431a7$25f66260$a001280a@phx.gbl...
merci Raymond, mais il ne s'agit que d'étiquettes sans
contrôle
lorsque l'utilisateur clic sur l'étiquette j'execute du VB
je voudrais faire une fonction plutôt que de mettre ce VB
sous chaque étiquette.
Pour ce faire, je dois repérer quelle étiquette a été
sélectée.
C'est ce que la boite à outils appelle intitulé C'est vrai que je peux mettre du vb ds chaque evènement sur clic du genre : libe = Me!C2.Caption Me!sous_org = libe Me!lis_def.RowSource = "SELECT Organe_def.Lib_defaut FROM Organe_def WHERE (((Organe_def.Lib_defaut) Like '* " & libe & " *')) WITH OWNERACCESS OPTION;"
Mais j'ai 18 etiquettes (intitulés), si c'était une zone de texte, je pourrais mettre: libe = Me!screen.activecontrol.Caption et utiliser une fonction c'est pourquoi je cherche s'il existe pour un intitulé une fonction du genre libe = Me!screen.activeIntitule.Caption Merci
-----Message d'origine----- Qu'appelles-tu "mais il ne s'agit que d'étiquettes sans contrôle" ? (je n'ai
pas lu tous les posts) tu peux bien mettre une fonction (la même) dans l'événement sur clic de
toutes tes étiquettes et dans cette fonction connaitre la légende de
l'étiquette .caption ou le nom .name de l'étiquette active. tu peux même
passer cet élément à la fonction dans les paramètres.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de
news:7fda01c431a7$25f66260$ merci Raymond, mais il ne s'agit que d'étiquettes sans contrôle lorsque l'utilisateur clic sur l'étiquette j'execute du VB je voudrais faire une fonction plutôt que de mettre ce VB sous chaque étiquette. Pour ce faire, je dois repérer quelle étiquette a été sélectée.
.
Raymond [mvp]
Si tu cliques directement sur une étiquette, l'activecontrol ne se déplace pas sur l'étiquette, il reste où il était. C'est à toi d'indiquer le nom de ton étiquette dans l'appel de la fonction sur l'événement clic.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:810701c431c0$43fb96e0$ C'est ce que la boite à outils appelle intitulé C'est vrai que je peux mettre du vb ds chaque evènement sur clic du genre : libe = Me!C2.Caption Me!sous_org = libe Me!lis_def.RowSource = "SELECT Organe_def.Lib_defaut FROM Organe_def WHERE (((Organe_def.Lib_defaut) Like '* " & libe & " *')) WITH OWNERACCESS OPTION;"
Mais j'ai 18 etiquettes (intitulés), si c'était une zone de texte, je pourrais mettre: libe = Me!screen.activecontrol.Caption et utiliser une fonction c'est pourquoi je cherche s'il existe pour un intitulé une fonction du genre libe = Me!screen.activeIntitule.Caption Merci
Si tu cliques directement sur une étiquette, l'activecontrol ne se déplace
pas sur l'étiquette, il reste où il était. C'est à toi d'indiquer le nom de
ton étiquette dans l'appel de la fonction sur l'événement clic.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<anonymous@discussions.microsoft.com> a écrit dans le message de
news:810701c431c0$43fb96e0$a001280a@phx.gbl...
C'est ce que la boite à outils appelle intitulé
C'est vrai que je peux mettre du vb ds chaque evènement
sur clic du genre :
libe = Me!C2.Caption
Me!sous_org = libe
Me!lis_def.RowSource = "SELECT Organe_def.Lib_defaut FROM
Organe_def WHERE (((Organe_def.Lib_defaut) Like '* " &
libe & " *')) WITH OWNERACCESS OPTION;"
Mais j'ai 18 etiquettes (intitulés), si c'était une zone
de texte, je pourrais mettre:
libe = Me!screen.activecontrol.Caption
et utiliser une fonction c'est pourquoi je cherche s'il
existe pour un intitulé une fonction du genre
libe = Me!screen.activeIntitule.Caption
Merci
Si tu cliques directement sur une étiquette, l'activecontrol ne se déplace pas sur l'étiquette, il reste où il était. C'est à toi d'indiquer le nom de ton étiquette dans l'appel de la fonction sur l'événement clic.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:810701c431c0$43fb96e0$ C'est ce que la boite à outils appelle intitulé C'est vrai que je peux mettre du vb ds chaque evènement sur clic du genre : libe = Me!C2.Caption Me!sous_org = libe Me!lis_def.RowSource = "SELECT Organe_def.Lib_defaut FROM Organe_def WHERE (((Organe_def.Lib_defaut) Like '* " & libe & " *')) WITH OWNERACCESS OPTION;"
Mais j'ai 18 etiquettes (intitulés), si c'était une zone de texte, je pourrais mettre: libe = Me!screen.activecontrol.Caption et utiliser une fonction c'est pourquoi je cherche s'il existe pour un intitulé une fonction du genre libe = Me!screen.activeIntitule.Caption Merci
