OVH Cloud OVH Cloud

code pour affichage sur état

2 réponses
Avatar
LR
Encore bonjour,
je reprend une BDD où, sur un état, je dois faire apparaitre la présence
d'un objet (case cochée) ou non, c'est a dire:
-si présent: case cochée("objet")+texte("etiobjet")
-si absent: pas de case +texte"etipasobjet"

En fait tout est en place (textes et case) et il y a déjà un code mais qui
ne fonctionne pas, le voici:
Private Sub Report_Activate()
If (objet = 0) Then
Report!etipasObjet.Visible = True
Report!etiobjet.Visible = False
Report!objet.Visible = False
Else
Report!etipasObjet.Visible = False
Report!etiobjet.Visible = True
Report!objet.Visible = True
End If

End Sub

Le champ "objet" comporte soit 0 soit 1

pourquoi ca ne marche pas?

--
merci!

2 réponses

Avatar
Pierre CFI [mvp]
bonjour
essaie plutot sur l'évenement format du report

--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"LR" a écrit dans le message de news:
Encore bonjour,
je reprend une BDD où, sur un état, je dois faire apparaitre la présence
d'un objet (case cochée) ou non, c'est a dire:
-si présent: case cochée("objet")+texte("etiobjet")
-si absent: pas de case +texte"etipasobjet"

En fait tout est en place (textes et case) et il y a déjà un code mais qui
ne fonctionne pas, le voici:
Private Sub Report_Activate()
If (objet = 0) Then
Report!etipasObjet.Visible = True
Report!etiobjet.Visible = False
Report!objet.Visible = False
Else
Report!etipasObjet.Visible = False
Report!etiobjet.Visible = True
Report!objet.Visible = True
End If

End Sub

Le champ "objet" comporte soit 0 soit 1

pourquoi ca ne marche pas?

--
merci!


Avatar
LR
peux tu m'expliquer stp car je débarque dans le monde Access!

--
merci!



bonjour
essaie plutot sur l'évenement format du report

--
Pierre CFI
MVP Microsoft Access

Site pour bien commencer
Access http://www.mpfa.info

"LR" a écrit dans le message de news:
Encore bonjour,
je reprend une BDD où, sur un état, je dois faire apparaitre la présence
d'un objet (case cochée) ou non, c'est a dire:
-si présent: case cochée("objet")+texte("etiobjet")
-si absent: pas de case +texte"etipasobjet"

En fait tout est en place (textes et case) et il y a déjà un code mais qui
ne fonctionne pas, le voici:
Private Sub Report_Activate()
If (objet = 0) Then
Report!etipasObjet.Visible = True
Report!etiobjet.Visible = False
Report!objet.Visible = False
Else
Report!etipasObjet.Visible = False
Report!etiobjet.Visible = True
Report!objet.Visible = True
End If

End Sub

Le champ "objet" comporte soit 0 soit 1

pourquoi ca ne marche pas?

--
merci!