Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Basculer l'affichage

Basculer l'affichage

4 réponses
Avatar
fusex132
Bonjour
existe t il un moyen de faire basculer l'affichage de plus de deux sous
formulaires
par la methode
if ![basculer l'affichage].caption"bla bla
me.........visible=true
me........visible=false
j'y arrive avec deux mais a trois ou plus je seche..
merci d'avance
A+
Raymond G
Signaler un problème avec ce contenu

4 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]
Bonjour.

Comment fais-tu pour deux car pour trois c'est pareil.
quelle version access ?
--
@+
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


"fusex132" a écrit dans le message de
news:
Bonjour
existe t il un moyen de faire basculer l'affichage de plus de deux sous
formulaires
par la methode
if ![basculer l'affichage].caption"bla bla
me.........visible=true
me........visibleúlse
j'y arrive avec deux mais a trois ou plus je seche..
merci d'avance
A+
Raymond G


Avatar
fusex132
Bonjour
voila mon code:
If Me![basculer affichage].Caption = "Propriétés Groupes Chantiers" Then
Me![ProprietesGroupesChantiers1].Visible = True
Me![Table des Visites Sous-formulaire1].Visible = False
Me![basculer affichage].Caption = "Afficher Gestion des Accès"
Else
Me![Table des Visites Sous-formulaire1].Visible = True
Me![ProprietesGroupesChantiers1].Visible = False
Me![basculer affichage].Caption = "Propriétés Groupes Chantiers"
End If
mais avec trois je sèche
merci

Bonjour.

Comment fais-tu pour deux car pour trois c'est pareil.
quelle version access ?
--
@+
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


"fusex132" a écrit dans le message de
news:
Bonjour
existe t il un moyen de faire basculer l'affichage de plus de deux sous
formulaires
par la methode
if ![basculer l'affichage].caption"bla bla
me.........visible=true
me........visibleúlse
j'y arrive avec deux mais a trois ou plus je seche..
merci d'avance
A+
Raymond G







Avatar
Raymond [mvp]
Evite les noms trop longs dans les noms de formulaires.
ne passe pas par Me car tu ne sais pas où tu peux te trouver et tu risques
de faire une erreur. utilises Forms.
Forms("FormPrincipal")("[ProprietesGroupesChantiers1]")("ProprietesGroupesChantiers2")("ProprietesGroupesChantiers3").visible=
False

ou

Forms("FormPrincipal").controls("ProprietesGroupesChantiers1").form.controls("ProprietesGroupesChantiers2").form.controls("ProprietesGroupesChantiers3").form.visible=
false

lis la page: http://officesystem.access.free.fr/vba/sf_sous_formulaires.htm
--
@+
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


"fusex132" a écrit dans le message de
news:
Bonjour
voila mon code:
If Me![basculer affichage].Caption = "Propriétés Groupes Chantiers" Then
Me![ProprietesGroupesChantiers1].Visible = True
Me![Table des Visites Sous-formulaire1].Visible = False
Me![basculer affichage].Caption = "Afficher Gestion des Accès"
Else
Me![Table des Visites Sous-formulaire1].Visible = True
Me![ProprietesGroupesChantiers1].Visible = False
Me![basculer affichage].Caption = "Propriétés Groupes Chantiers"
End If
mais avec trois je sèche
merci


Avatar
fusex132
Bonjour Raymond
je te remercie je vais suivre tes conseils.
Merci encore et a bientôt
RaymoND G


Evite les noms trop longs dans les noms de formulaires.
ne passe pas par Me car tu ne sais pas où tu peux te trouver et tu risques
de faire une erreur. utilises Forms.
Forms("FormPrincipal")("[ProprietesGroupesChantiers1]")("ProprietesGroupesChantiers2")("ProprietesGroupesChantiers3").visible=
False

ou

Forms("FormPrincipal").controls("ProprietesGroupesChantiers1").form.controls("ProprietesGroupesChantiers2").form.controls("ProprietesGroupesChantiers3").form.visible=
false

lis la page: http://officesystem.access.free.fr/vba/sf_sous_formulaires.htm
--
@+
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


"fusex132" a écrit dans le message de
news:
Bonjour
voila mon code:
If Me![basculer affichage].Caption = "Propriétés Groupes Chantiers" Then
Me![ProprietesGroupesChantiers1].Visible = True
Me![Table des Visites Sous-formulaire1].Visible = False
Me![basculer affichage].Caption = "Afficher Gestion des Accès"
Else
Me![Table des Visites Sous-formulaire1].Visible = True
Me![ProprietesGroupesChantiers1].Visible = False
Me![basculer affichage].Caption = "Propriétés Groupes Chantiers"
End If
mais avec trois je sèche
merci