Discussion :

[mapmip]

bonjour,
dans un formulaire on peut faire apparaitre ou pas le selecteur
qui permet de voir l'etat d'un enregistrement


comment faire en vba pour recuperer la valeur du selecteur ?

merci d'avance

[Tofalu]

Quelle valeur ?

Quelques pistes à améliorer :

Private Sub Form_Current()
'Le selecteur est affiché ou non
If Me.NavigationButtons Then
MsgBox "selecteur activé"
Else
MsgBox "selecteur inactif"
End If

'Numero de l'enregistrement
MsgBox Me.Recordset.AbsolutePosition + 1

'Si il existe un enregistrement aprés
Dim oRst As DAO.Recordset
Set oRst = Me.RecordsetClone
With oRst
.Bookmark = Me.Recordset.Bookmark
.MoveNext
If .EOF Then MsgBox "dernier enregistrement"
End With
End Sub

[mapmip]

par exemple
si l'enregistrement est actuellment en cours de modif par un autre utilisateur

(icone : soit triangle soit crayon soit sens interdit)

[Tofalu]

Interresse toi alors aux propriétés Dirty et Addnew du formulaire

[mapmip]

cela ne me conviendrait pas car ce fichier access sera ouvert par plusieurs
utilisateurs en meme temps