Bonjour tout le monde,


J'ai un formulaire avec des champs avec des séries de numéros (champ : numbague)

Je voudrais que l'utilisateur puisse supprimer n'importe quelle numéro à condition qu'elle n'existe pas dans ma table "Ma table".

Mon début de code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Select Case MsgBox("Etes-vous sur de vouloir supprimer le numéro de bague ?", vbOKCancel, "Suppression d'une bague")
Case vbOK
 
If Me.numBague = "(Select * From [matable] Where numbague = me.numBague)" Then
 
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdDeleteRecord
 
Else
 
MsgBox ("Vous ne pouvez pas supprimer.")
 
End If
 
Case vbCancel
 
End Select
La requete doit être fausse, je ne vois pas comment l'écrire pour vérifier si le champ existe dans la table. Merci d'avance et merci pour ce forumet site complet.