OVH Cloud OVH Cloud

openreport

2 réponses
Avatar
xav
bonjour

sur un etat dont la source est une requete Rclient, j'ai un champ visite qui
doit etre visible si le champ droit est vide ou null.
le test doit etre fait pour chaque ligne de l'etat

j'ai essaye avec :
Private Sub Report_Open(Cancel As Integer)
If IsEmpty(Me!droit) Or IsNull(Me!droit) Then
Me!visite.Visible = True
End If
End Sub
et ca marche pas

merci de votre aide

xav

2 réponses

Avatar
Raymond [mvp]
Bonjour.

Il faut le faire sur l'événement Détail_Format
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
Me!visite.Visible = IsNull(Me!droit)
End If

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


"xav" a écrit dans le message de news:
On8$
bonjour

sur un etat dont la source est une requete Rclient, j'ai un champ visite
qui
doit etre visible si le champ droit est vide ou null.
le test doit etre fait pour chaque ligne de l'etat

j'ai essaye avec :
Private Sub Report_Open(Cancel As Integer)
If IsEmpty(Me!droit) Or IsNull(Me!droit) Then
Me!visite.Visible = True
End If
End Sub
et ca marche pas

merci de votre aide

xav





Avatar
xav
merci raymond ca fonctionne tres bien
xav



"Raymond [mvp]" wrote in message
news:
Bonjour.

Il faut le faire sur l'événement Détail_Format
Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
Me!visite.Visible = IsNull(Me!droit)
End If

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


"xav" a écrit dans le message de news:
On8$
bonjour

sur un etat dont la source est une requete Rclient, j'ai un champ visite
qui
doit etre visible si le champ droit est vide ou null.
le test doit etre fait pour chaque ligne de l'etat

j'ai essaye avec :
Private Sub Report_Open(Cancel As Integer)
If IsEmpty(Me!droit) Or IsNull(Me!droit) Then
Me!visite.Visible = True
End If
End Sub
et ca marche pas

merci de votre aide

xav