OVH Cloud OVH Cloud

visible

9 réponses
Avatar
didier
Bonjour

je veut rendre visible une =E9tiquette suivant l'=E9tat du=20
controle associ=E9 donc j'ai cr=E9e au formatage de mon=20
d=E9tail de formulaire et quand j'execute il me met=20
"Propri=E9t=E9 ou m=E9thode non g=E9r=E9e par cet objet"

Voici ma proc=E9dure
Private Sub D=E9tail_Format(Cancel As Integer, FormatCount=20
As Integer)
If IsNull(Me.nomControl) Then
Me!nomEtiquette.setVisible =3D False
Else
Me!nomEtiquette.setVisible =3D True
End If
End Sub

9 réponses

Avatar
Raymond [mvp]
Bonjour.

modifier en:
Me!nomEtiquette.Visible = False

préférer cette syntaxe, plus simple et plus rapide:
Me!nomEtiquette.Visible = Not IsNull(Me.nomControl)

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


"didier" a écrit dans le message de
news:122a301c3f623$1128ca40$
Bonjour

je veut rendre visible une étiquette suivant l'état du
controle associé donc j'ai crée au formatage de mon
détail de formulaire et quand j'execute il me met
"Propriété ou méthode non gérée par cet objet"

Voici ma procédure
Private Sub Détail_Format(Cancel As Integer, FormatCount
As Integer)
If IsNull(Me.nomControl) Then
Me!nomEtiquette.setVisible = False
Else
Me!nomEtiquette.setVisible = True
End If
End Sub
Avatar
Père Fouras
Bonjour,

Si ma mémoire est bonne il faut faire un truc du genre :
MonEtiquette.Visible = True/False


-----Message d'origine-----
Bonjour

je veut rendre visible une étiquette suivant l'état du
controle associé donc j'ai crée au formatage de mon
détail de formulaire et quand j'execute il me met
"Propriété ou méthode non gérée par cet objet"

Voici ma procédure
Private Sub Détail_Format(Cancel As Integer, FormatCount
As Integer)
If IsNull(Me.nomControl) Then
Me!nomEtiquette.setVisible = False
Else
Me!nomEtiquette.setVisible = True
End If
End Sub



.



Avatar
Didier
Re
effectivement c'est plus simple et ça marche
mais comment peut t-on faire la même chose pour un sous
état
Voila ce que j'ai fait mais cela fonctione pas
Me!Etiquette28.Visible = Not IsNull
(Me.Report.nomdusousformulaire)

-----Message d'origine-----
Bonjour.

modifier en:
Me!nomEtiquette.Visible = False

préférer cette syntaxe, plus simple et plus rapide:
Me!nomEtiquette.Visible = Not IsNull(Me.nomControl)

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


"didier" a écrit
dans le message de

news:122a301c3f623$1128ca40$
Bonjour

je veut rendre visible une étiquette suivant l'état du
controle associé donc j'ai crée au formatage de mon
détail de formulaire et quand j'execute il me met
"Propriété ou méthode non gérée par cet objet"

Voici ma procédure
Private Sub Détail_Format(Cancel As Integer, FormatCount
As Integer)
If IsNull(Me.nomControl) Then
Me!nomEtiquette.setVisible = False
Else
Me!nomEtiquette.setVisible = True
End If
End Sub




.



Avatar
Raymond [mvp]
pour un sous-état:
report!monétat!Monsousétat.Report!monétiquette.Visible = Not IsNull
.........



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


"Didier" a écrit dans le message de
news:11c0701c3f63a$b6c0f1a0$
Re
effectivement c'est plus simple et ça marche
mais comment peut t-on faire la même chose pour un sous
état
Voila ce que j'ai fait mais cela fonctione pas
Me!Etiquette28.Visible = Not IsNull
(Me.Report.nomdusousformulaire)
Avatar
didier
il me met une erreur de compilation "Argument non
facultatif"
voila la procédure
Report!Commandes!Dépot1.Report!Etiquette28.Visible = Not
IsNull
Mon etat est "Commandes" et le sous état "dépot1" et je
veut que l'etiquette de mon sous état dépot1 soit visible
que lorsque le sous état est non null

-----Message d'origine-----
pour un sous-état:
report!monétat!Monsousétat.Report!monétiquette.Visible =
Not IsNull

..........



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


"Didier" a écrit
dans le message de

news:11c0701c3f63a$b6c0f1a0$
Re
effectivement c'est plus simple et ça marche
mais comment peut t-on faire la même chose pour un sous
état
Voila ce que j'ai fait mais cela fonctione pas
Me!Etiquette28.Visible = Not IsNull
(Me.Report.nomdusousformulaire)



.



Avatar
Raymond [mvp]
si c'est pour mettre le sous-formulaire invisible, il faut tester le
recordcount du sous-formulaire et s'il est à 0, on met le sous-formulaire à
invisible et l'étiquette suivra le contrôle.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"didier" a écrit dans le message de
news:1299001c3f644$d7a66080$
il me met une erreur de compilation "Argument non
facultatif"
voila la procédure
Report!Commandes!Dépot1.Report!Etiquette28.Visible = Not
IsNull
Mon etat est "Commandes" et le sous état "dépot1" et je
veut que l'etiquette de mon sous état dépot1 soit visible
que lorsque le sous état est non null
Avatar
Didier
Non je veut mettre une étiquette de l'état principale non
visible si le sous-état est vide (rien d'afficher dans ce
sous-état) et visible s'il y a des enregistrement à
afficher
c'est comme précedement avec mon controle sauf que mon
controle est remplacé par un sous-état c'est pour ça que
j'ai repris l'expression suivante
Me!Etiquette28.Visible = Not IsNull(Me.Report!Dépot1)
j'ai remplacé "nonControle" par "Report!nomsousétat"
mais ça marche pas l'étiquette est toujours affiché

-----Message d'origine-----
si c'est pour mettre le sous-formulaire invisible, il
faut tester le

recordcount du sous-formulaire et s'il est à 0, on met
le sous-formulaire à

invisible et l'étiquette suivra le contrôle.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"didier" a écrit
dans le message de

news:1299001c3f644$d7a66080$
il me met une erreur de compilation "Argument non
facultatif"
voila la procédure
Report!Commandes!Dépot1.Report!Etiquette28.Visible = Not
IsNull
Mon etat est "Commandes" et le sous état "dépot1" et je
veut que l'etiquette de mon sous état dépot1 soit visible
que lorsque le sous état est non null



.



Avatar
3stone
Salut,

"Didier"
Me!Etiquette28.Visible = Not IsNull(Me.Report!Dépot1)
j'ai remplacé "nonControle" par "Report!nomsousétat"
mais ça marche pas l'étiquette est toujours affiché



Me!Etiquette28.Visible = (Me!Dépot1.Report.Recorsetclone.RecordCount > 0)



--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------
Avatar
Didier
Il me met un message d'erreur d'exécution 2465
Erreur définie par l'application ou par l'objet
-----Message d'origine-----
Salut,

"Didier"
Me!Etiquette28.Visible = Not IsNull(Me.Report!Dépot1)
j'ai remplacé "nonControle" par "Report!nomsousétat"
mais ça marche pas l'étiquette est toujours affiché



Me!Etiquette28.Visible = (Me!
Dépot1.Report.Recorsetclone.RecordCount > 0)




--
A+
Pierre (3stone) Access MVP
-----------------------------
http://users.skynet.be/mpfa
-----------------------------




.