Supprision d'un element a partir d'une liste deroulanteRésolu

Question

Bonjour,
j'aimerais bien savoir comment faire un formulaire qui permertrai de supprimer un element d'une base de donn&#233;e en selectionant cet element dans une liste deroulante. 
pour l'instant j'ai fait ca:

Public db As Database


Public enrPc As Recordset

Private Sub sup_cli_Click()
On Error GoTo Err_sup_cli_Click
   Set db = Application.CurrentDb
    Set enrPc = db.OpenRecordset("Famille")
    enrPc.Delete
    enrPc.MoveNext
    If enrPc.EOF Then 'EOF ve dir End of file
        enrPc.MovePrevious
    End If
    Exit Sub
    
Err_sup_cli_Click:
    MsgBox Err.Description

End Sub

ca m'efface le premier element de la liste a tout les coups.
Pourrais vous m'aider? 
Merci

jrivet · Accepted Answer

Salut,

Il faut effectuer ton filtre sur la base avant de supprimer le champ (chose que tu n'a pas l'air de faire)

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

dourga · Answer

Merci ,
mais je en sais pas comment fonctionne les filtres sur VBA sur access...

jrivet · Answer

Re,

Tu fais une requete SQL et tu la mais dans la source du recordset.

Comme ca tu es sur que l'element dans le recordset est le champ que tu veux supprimer
et ensuite tu fais un Update du recordset   

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

dourga · Answer

Merci!!!

hi people i just came in this site to have help
merci de bien vouloir m'aider

dourga · Answer

j'ai fait ca:
 
Private Sub sup_cli_Click()
    If IsNull(Me!Client) Then
      MsgBox "Aucun &#233;l&#233;ment s&#233;lectionn&#233; dans la liste.", vbCritical
  Else
      DoCmd.RunSQL "DELETE Famille.* FROM Famille WHERE Famille.No_dest=" & _
       Me!Client & ";"
      Me!Client.SetFocus
      Form.Refresh
  End If
End Sub

c'est bon? est ce que j'ai bien utiliser un filtre? je me suis bas&#233;e sur se que tu m'as donner mais je ne suis pas sure de l'avoir bien appliquer... du moin ca marche... c peut etre une autre methode... mais je voudrais savoir si j'ai utiliser un filtre...

hi people i just came in this site to have help
merci de bien vouloir m'aider

jrivet · Answer

Salut,

Si ca te convient, Effectivement c est mieux.

En revanche fait bien attention de ne pas trop Effacer (arrange toi bien pour supprimer ce que tu veux)

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e