Discussion :

[Daejung]

Bonjour,

Je voudrais utiliser un évènement avant suppression dans un formulaire et vérifier, avant suppression, que cet enregistrement n'est pas utilisé dans une 2ème table. Dans cette 2ème table j'utilise le numéro d'index de la 1ère et mon code (Form_BeforeDelConfirm) vérifie si l'enregistrement à supprimer dans la 1ère table est utilisé ou non dans la 2ème.

Mon problème est que quand je suis dans l'évènement "BeforeDelConfirm", je ne pointe plus sur l'enregistrement en cours de suppression mais sur le suivant.

Comment connaître le numéro d'index de l'enregistrement en cours de suppression ?

merci

[Robert1957]

Bonjour Daejung,

Dans le code de ton formulaire, en en tête, juste sous Option Explicit tu déclares une variable:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Option Compare Database
Option Explicit
Private loEnregistrement As Long

A toi de choisir le bon type de variable. Puis sur l'événement Form Current:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub Form_Current()
    loEnregistrement = Me.LeNomDeTaCléPrimaire 
End Sub

Tu peux ainsi récupérer le bon numéro d'enregistrement pour faire tes tests.

Bonne journée

[Daejung]

Merci mais cela ne marche pas

loEnregistrement renvoie le numéro d'enregistrement qui suit celui en cours de suppression.

Apparemment l'événement Form Current ne pointe pas sur l'enregistrement en cours de suppression

[Robert1957]

Bonjour Daejung,

Ok je viens de voir, il faut que tu mettes le teste sur "Private Sub Form_Delete(Cancel as Integer)

Désolé j'avais mal lu ton premier post.

Bonne soirée

[Daejung]

Cela marche, merci !

Mais j'avoue que la distinction entre l'évènement "delete" et "BeforeDelConfirm" n'est pas très claire pour moi. l'essentiel est que cela fonctionne

[Daejung]

du coup cela marche sans l'évènement Form_Current