Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
atmus
Merci Raymond,
J'ai un autre point: Certaines requêtes, sources de qq états à ouvrir, contient des critères de type "Entrer le n° de ...".
Je voudrais, si possible, en plus de cocher une case à cocher, avoir à coté, une liste modifiable contenant les valeurs qu'on rentrer dans la requête paramétrée, de telle façon à choisir sur le formulaire la valeur avant de cliquer sur le bouton Afficher.
Comment intégrer tout cela, dans le code que tu m'a procuré tout à lors?!!
Encore merci et désolé pour mes ennuis
A+
-----Message d'origine----- Bonjour.
Tu peux passer par If mais sans les imbriquer et tous les tester les uns
derrière les autres, le temps passé ne sera pas significatif
Private Sub Commande1_Click() If Me.Cocher1 Then : DoCmd.OpenReport "reportname", acViewPreview :
Me.Cocher1 = False If Me.Cocher2 Then : DoCmd.OpenReport "reportname", acViewPreview :
Me.Cocher2 = False If Me.Cocher3 Then : DoCmd.OpenReport "reportname", acViewPreview :
Me.Cocher3 = False 'ainsi de suite End Sub
Tu peux également, si les cases à cocher portent le même nom suivi du nombre
01,02,03 etc, et que les états portent le même nom et le même numéro que les
cases, faire une boucle de test et d'impression.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"atmus" a écrit dans le message de news:02ed01c34797$dabd51e0$ Bonjour,
Dans un formulaire, j'ai plusieurs cases à coucher (ET PAS GROUPE D'OPTIONS) (une dizaine) et un bouton de commande "Afficher".
Je voudrais avoir un code qui me permettrait d'afficher TOUS (un ou plus) les états que j'ai sélectionné.
qqn pourrait m'aider?
Merci
.
Merci Raymond,
J'ai un autre point:
Certaines requêtes, sources de qq états à ouvrir, contient
des critères de type "Entrer le n° de ...".
Je voudrais, si possible, en plus de cocher une case à
cocher, avoir à coté, une liste modifiable contenant les
valeurs qu'on rentrer dans la requête paramétrée, de telle
façon à choisir sur le formulaire la valeur avant de
cliquer sur le bouton Afficher.
Comment intégrer tout cela, dans le code que tu m'a
procuré tout à lors?!!
Encore merci et désolé pour mes ennuis
A+
-----Message d'origine-----
Bonjour.
Tu peux passer par If mais sans les imbriquer et tous les
tester les uns
derrière les autres, le temps passé ne sera pas
significatif
Private Sub Commande1_Click()
If Me.Cocher1 Then : DoCmd.OpenReport "reportname",
acViewPreview :
Me.Cocher1 = False
If Me.Cocher2 Then : DoCmd.OpenReport "reportname",
acViewPreview :
Me.Cocher2 = False
If Me.Cocher3 Then : DoCmd.OpenReport "reportname",
acViewPreview :
Me.Cocher3 = False
'ainsi de suite
End Sub
Tu peux également, si les cases à cocher portent le même
nom suivi du nombre
01,02,03 etc, et que les états portent le même nom et le
même numéro que les
cases, faire une boucle de test et d'impression.
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"atmus" <atmus@no> a écrit dans le message de
news:02ed01c34797$dabd51e0$a001280a@phx.gbl...
Bonjour,
Dans un formulaire, j'ai plusieurs cases à coucher (ET PAS
GROUPE D'OPTIONS) (une dizaine) et un bouton de
commande "Afficher".
Je voudrais avoir un code qui me permettrait d'afficher
TOUS (un ou plus) les états que j'ai sélectionné.
J'ai un autre point: Certaines requêtes, sources de qq états à ouvrir, contient des critères de type "Entrer le n° de ...".
Je voudrais, si possible, en plus de cocher une case à cocher, avoir à coté, une liste modifiable contenant les valeurs qu'on rentrer dans la requête paramétrée, de telle façon à choisir sur le formulaire la valeur avant de cliquer sur le bouton Afficher.
Comment intégrer tout cela, dans le code que tu m'a procuré tout à lors?!!
Encore merci et désolé pour mes ennuis
A+
-----Message d'origine----- Bonjour.
Tu peux passer par If mais sans les imbriquer et tous les tester les uns
derrière les autres, le temps passé ne sera pas significatif
Private Sub Commande1_Click() If Me.Cocher1 Then : DoCmd.OpenReport "reportname", acViewPreview :
Me.Cocher1 = False If Me.Cocher2 Then : DoCmd.OpenReport "reportname", acViewPreview :
Me.Cocher2 = False If Me.Cocher3 Then : DoCmd.OpenReport "reportname", acViewPreview :
Me.Cocher3 = False 'ainsi de suite End Sub
Tu peux également, si les cases à cocher portent le même nom suivi du nombre
01,02,03 etc, et que les états portent le même nom et le même numéro que les
cases, faire une boucle de test et d'impression.
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"atmus" a écrit dans le message de news:02ed01c34797$dabd51e0$ Bonjour,
Dans un formulaire, j'ai plusieurs cases à coucher (ET PAS GROUPE D'OPTIONS) (une dizaine) et un bouton de commande "Afficher".
Je voudrais avoir un code qui me permettrait d'afficher TOUS (un ou plus) les états que j'ai sélectionné.
qqn pourrait m'aider?
Merci
.
Xavier HUE
Bonjour atmus,
Dans l'évènement sur clic de ton bouton If Me.CaseàCocher1.Value = True Then ... Action à faire si case à cocher "cochée" End If
If Me.CaseàCocher2.Value = True Then ... Action à faire si case à cocher "cochée" End If
Etc...
Cordialement.
PS: Enlever blurg dans l'adresse mail.
Bonjour atmus,
Dans l'évènement sur clic de ton bouton
If Me.CaseàCocher1.Value = True Then
... Action à faire si case à cocher "cochée"
End If
If Me.CaseàCocher2.Value = True Then
... Action à faire si case à cocher "cochée"
End If
