retour d'info NoData

bonjour,
j'ai ce script ecrit par Eric :
============================ > Private Sub Report_NoData(Cancel As Integer)
Me.NoAbsence.Visible = True
End Sub
============================ > qui me retourne un label d'info "résultat néant" dans un état ... est-ce
possible de le transposer pour un formulaire ?
J'ai remplace Report par Form mais ça ne marche pas...
Merci d'avance

Bonjour, Ptkppr (toujours aussi difficile à prononcer :-)

Il n'y a pas d'événement NoData sur les formulaires. Je verrais plutôt
quelque chose du style:

Private Sub Form_Current()
If Me.RecordCount = 0 Then
Me.NoAbsence.Visible = True
Else
Me.NoAbsence.Visible = False
End If
End Sub

Ou mieux, en une ligne:

Private Sub Form_Current()
Me.NoAbsence.Visible = (Me.RecordCount = 0)
End Sub

Bonne continuation

Oups!
Pour tester le nombre d'éléments présents sur le formulaire, il est
préférable d'utiliser:
Me.Recordset.RecordCount
Ce qui donne:

Private Sub Form_Current()
Me.NoAbsence.Visible = (Me.Recordset.RecordCount = 0)
End Sub

Désolé...