[VBA] bouton supprimer

bonjour, j'ais un petit soucis
j'ais créer un bouton dans un formulaire afin de supprimer une ligne de ma liste déroulante l'erreur suivante s'affiche quand je clique sur mon bouton

erreur d'exécution '3075':
Erreur de synthaxe dans la chaine dans l'expression
'IP='81.252.125.65'

mon code est le suivant:

Private Sub Commande68_Click()
Dim bds As Database
Dim stDocName As String
Set bds = OpenDatabase("C:\MAC_ip\bdmac.mdb")
DoCmd.RunSQL "DELETE * FROM MAC_IP WHERE IP='" & Modifiable8.Column(0)
Modifiable8.Requery
End Sub

si vs pouviez m'aider parce que la je vois pas du tout...
merci
Configuration: Windows Vista
Internet Explorer 7.0

3 réponses

  1. juste après la virgule t'as le signe ' ; supprime l'apostrophe en question et relance
    1. bonjour
      je pense que tu veux parler de l'apostrophe qui se trouve dans :
      WHERE IP='"
      si c'est le cas, il me met le message suivant:
      erreur de synthaxe dans le nombre dans l'expression 'IP=81.252.125.65'
      je vois pas vraiment d'ou vient mon problème.
  2. Bonjour,

    La ligne :

    DoCmd.RunSQL "DELETE * FROM MAC_IP WHERE IP='" & Modifiable8.Column(0)

    devrait à mon avis se lire :

    DoCmd.RunSQL "DELETE * FROM MAC_IP WHERE IP=" & """" & Modifiable8.Column(0) & """"

    Lupin
    1. Bjr
      Pour moi la ligne correcte est plutot
      ...WHERE IP='" & Modifiable8.Column(0) & "';"

      le ; n'étant peut être pas nécessairement utile mais on ne sait jamais