Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Access Afficher/Masquer dynamiquement des sections dans un formulaire

Afficher/Masquer dynamiquement des sections dans un formulaire

6 réponses
Avatar
Tonic
Bonjour,
Je travaille sur un formulaire (pas un état) et j'aimerai réaliser l'action
suivante:

Mon formulaire démarre en affichant uniquement la section "EnTête du
Formulaire"
et propose une question.En fonction de la réponse fournie par un
l'utlisateur j'aimerai:
-developper la section détail,si il répond oui.
-ou developper la section "Pied de Page du formulaire",si il répond non.

J'ai déjà tester ceci sans succès:

If Reponse="oui" then
Me.Section(acDetail).Visible =True
Elseif Reponse="non"
Me.Section(acFooter).Visible=True
Endif

NB:Le formulaire necessite peut etre une sorte de "refresh" que je n'est pas
implémenté

Est-il possible de réaliser ces opérations et si oui quelqu'un aurait'il une
idée ???

Merci d'avance,
Tonic
PS:Je travaille sous Access 2003
Signaler un problème avec ce contenu

6 réponses

Supprimer
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
Avatar
Raymond [mvp]
Bonsoir.

ce doit être un problème sur ta procédure car le true affiche directement et
automatiquement la section. vérifie avec des points d'arrêt dans ta
procédure que tu passes bien sur les lignes demandées.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Tonic" a écrit dans le message de news:

Bonjour,
Je travaille sur un formulaire (pas un état) et j'aimerai réaliser
l'action
suivante:

Mon formulaire démarre en affichant uniquement la section "EnTête du
Formulaire"
et propose une question.En fonction de la réponse fournie par un
l'utlisateur j'aimerai:
-developper la section détail,si il répond oui.
-ou developper la section "Pied de Page du formulaire",si il répond non.

J'ai déjà tester ceci sans succès:

If Reponse="oui" then
Me.Section(acDetail).Visible =True
Elseif Reponse="non"
Me.Section(acFooter).Visible=True
Endif

NB:Le formulaire necessite peut etre une sorte de "refresh" que je n'est
pas
implémenté

Est-il possible de réaliser ces opérations et si oui quelqu'un aurait'il
une
idée ???

Merci d'avance,
Tonic
PS:Je travaille sous Access 2003



Avatar
Tonic
Bonjour Raymond et merci pour ta réponse,

J'ai tout essayé et rien ne semble marcher: le compilateur passe sur la
ligne de code et rien ne se passe...Peut-être ai-je activer des options sur
le formulaire qui ne permettent pas cette expansion dynamique des
sections....Ou peut-être que le formulaire necessite une actualisation??
Pourrais-tu m'eclairer ??
Merci D'avance,
Tonic

Bonsoir.

ce doit être un problème sur ta procédure car le true affiche directement et
automatiquement la section. vérifie avec des points d'arrêt dans ta
procédure que tu passes bien sur les lignes demandées.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


Avatar
Jessy Sempere [MVP]
Bonjour

Je pense que le problème vient surtout de ta façon de gérer
la question...

Comment gères-tu ta question ???

Si tu utilises un msgBox, ce sont tes conditions qui sont fausse,
si c'est le cas essais plutôt :

dim Reponse as variant
Reponse = msgbox ("ton msg",vbYesNo)
If Reponse=vbyes then
Me.Section(acDetail).Visible =True
Else
Me.Section(acFooter).Visible=True
Endif

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Tonic" a écrit dans le message news:

Bonjour Raymond et merci pour ta réponse,

J'ai tout essayé et rien ne semble marcher: le compilateur passe sur la
ligne de code et rien ne se passe...Peut-être ai-je activer des options
sur

le formulaire qui ne permettent pas cette expansion dynamique des
sections....Ou peut-être que le formulaire necessite une actualisation??
Pourrais-tu m'eclairer ??
Merci D'avance,
Tonic

Bonsoir.

ce doit être un problème sur ta procédure car le true affiche
directement et


automatiquement la section. vérifie avec des points d'arrêt dans ta
procédure que tu passes bien sur les lignes demandées.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum





Avatar
Tonic
Bonjour Jessy,

La réponse à la question se fait par l'intermédiaire d'une groupe d'option
qui prend la valeur 1 pour oui et la valeur 2 pour non..Lorsque l'utlisateur
valide la réponse (click sur un bouton de commande) le code executé est le
suivant:

Private Sub cmdValider_Click()
If grpReponse=1 Then
Me.Section(acDetail).Visible=True
Elseif grpReponse=2 Then
Me.Section(acFooter).Visible=True
Endif

J'ai aussi essayer pour tester de faire un formulaire avec uniquement 2
boutons de commande,l'un pour afficher la section détail et l'autre la
section Pied de Formulaire (ces sections ayant leur propriété visible à non
au chargement du formulaire) et cela ne donne rien....Comment cela se fait-il
??



Bonjour

Je pense que le problème vient surtout de ta façon de gérer
la question...

Comment gères-tu ta question ???

Si tu utilises un msgBox, ce sont tes conditions qui sont fausse,
si c'est le cas essais plutôt :

dim Reponse as variant
Reponse = msgbox ("ton msg",vbYesNo)
If Reponse=vbyes then
Me.Section(acDetail).Visible =True
Else
Me.Section(acFooter).Visible=True
Endif

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Tonic" a écrit dans le message news:

Bonjour Raymond et merci pour ta réponse,

J'ai tout essayé et rien ne semble marcher: le compilateur passe sur la
ligne de code et rien ne se passe...Peut-être ai-je activer des options
sur

le formulaire qui ne permettent pas cette expansion dynamique des
sections....Ou peut-être que le formulaire necessite une actualisation??
Pourrais-tu m'eclairer ??
Merci D'avance,
Tonic

Bonsoir.

ce doit être un problème sur ta procédure car le true affiche
directement et


automatiquement la section. vérifie avec des points d'arrêt dans ta
procédure que tu passes bien sur les lignes demandées.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum










Avatar
Jessy Sempere [MVP]
Re,

Autre possibilité, ça donne bien quelque chose mais tu ne le vois
pas...

Je m'explique, si tu à mis Oui à la taille ajustée de ton formulaire,
il s'ajuste à la taille de ton en-tête de formulaire du coup quand
tu rajoutes ta section détail ou autre, tu ne les vois pas parce qu'il
ne se redimensionne pas...

Essais de refaire tes teste mais en mettant ton formulaire en plein
écran.

Alors ???

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Tonic" a écrit dans le message news:

Bonjour Jessy,

La réponse à la question se fait par l'intermédiaire d'une groupe d'option
qui prend la valeur 1 pour oui et la valeur 2 pour non..Lorsque
l'utlisateur

valide la réponse (click sur un bouton de commande) le code executé est le
suivant:

Private Sub cmdValider_Click()
If grpReponse=1 Then
Me.Section(acDetail).Visible=True
Elseif grpReponse=2 Then
Me.Section(acFooter).Visible=True
Endif

J'ai aussi essayer pour tester de faire un formulaire avec uniquement 2
boutons de commande,l'un pour afficher la section détail et l'autre la
section Pied de Formulaire (ces sections ayant leur propriété visible à
non

au chargement du formulaire) et cela ne donne rien....Comment cela se
fait-il

??



Bonjour

Je pense que le problème vient surtout de ta façon de gérer
la question...

Comment gères-tu ta question ???

Si tu utilises un msgBox, ce sont tes conditions qui sont fausse,
si c'est le cas essais plutôt :

dim Reponse as variant
Reponse = msgbox ("ton msg",vbYesNo)
If Reponse=vbyes then
Me.Section(acDetail).Visible =True
Else
Me.Section(acFooter).Visible=True
Endif

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Tonic" a écrit dans le message news:

Bonjour Raymond et merci pour ta réponse,

J'ai tout essayé et rien ne semble marcher: le compilateur passe sur
la



ligne de code et rien ne se passe...Peut-être ai-je activer des
options



sur
le formulaire qui ne permettent pas cette expansion dynamique des
sections....Ou peut-être que le formulaire necessite une
actualisation??



Pourrais-tu m'eclairer ??
Merci D'avance,
Tonic

Bonsoir.

ce doit être un problème sur ta procédure car le true affiche
directement et


automatiquement la section. vérifie avec des points d'arrêt dans ta
procédure que tu passes bien sur les lignes demandées.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum












Avatar
Tonic
Alors ça marche !! Effectivement, le fait de mettre le formulaire en plein
écran me permet de visualiser les sections! Néanmoins j'ai encore deux
questions:
1)Est-il possible de supprimer les lignes noires qui marquent les
différentes sections?
2)Y'at'il une fonction permettant de redimensionner automatiquement le
formulaire ??


Re,

Autre possibilité, ça donne bien quelque chose mais tu ne le vois
pas...

Je m'explique, si tu à mis Oui à la taille ajustée de ton formulaire,
il s'ajuste à la taille de ton en-tête de formulaire du coup quand
tu rajoutes ta section détail ou autre, tu ne les vois pas parce qu'il
ne se redimensionne pas...

Essais de refaire tes teste mais en mettant ton formulaire en plein
écran.

Alors ???

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Tonic" a écrit dans le message news:

Bonjour Jessy,

La réponse à la question se fait par l'intermédiaire d'une groupe d'option
qui prend la valeur 1 pour oui et la valeur 2 pour non..Lorsque
l'utlisateur

valide la réponse (click sur un bouton de commande) le code executé est le
suivant:

Private Sub cmdValider_Click()
If grpReponse=1 Then
Me.Section(acDetail).Visible=True
Elseif grpReponse=2 Then
Me.Section(acFooter).Visible=True
Endif

J'ai aussi essayer pour tester de faire un formulaire avec uniquement 2
boutons de commande,l'un pour afficher la section détail et l'autre la
section Pied de Formulaire (ces sections ayant leur propriété visible à
non

au chargement du formulaire) et cela ne donne rien....Comment cela se
fait-il

??



Bonjour

Je pense que le problème vient surtout de ta façon de gérer
la question...

Comment gères-tu ta question ???

Si tu utilises un msgBox, ce sont tes conditions qui sont fausse,
si c'est le cas essais plutôt :

dim Reponse as variant
Reponse = msgbox ("ton msg",vbYesNo)
If Reponse=vbyes then
Me.Section(acDetail).Visible =True
Else
Me.Section(acFooter).Visible=True
Endif

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Tonic" a écrit dans le message news:

Bonjour Raymond et merci pour ta réponse,

J'ai tout essayé et rien ne semble marcher: le compilateur passe sur
la



ligne de code et rien ne se passe...Peut-être ai-je activer des
options



sur
le formulaire qui ne permettent pas cette expansion dynamique des
sections....Ou peut-être que le formulaire necessite une
actualisation??



Pourrais-tu m'eclairer ??
Merci D'avance,
Tonic

Bonsoir.

ce doit être un problème sur ta procédure car le true affiche
directement et


automatiquement la section. vérifie avec des points d'arrêt dans ta
procédure que tu passes bien sur les lignes demandées.

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum