[VBA] bouton supprimer

alex86 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
freto Messages postés 1543 Date d'inscription   Statut Membre Dernière intervention   -
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
A voir également:

3 réponses

GuestCam Messages postés 56 Date d'inscription   Statut Membre Dernière intervention  
 
juste après la virgule t'as le signe ' ; supprime l'apostrophe en question et relance
0
alex86 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention  
 
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.
0
Utilisateur anonyme
 
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
0
freto Messages postés 1543 Date d'inscription   Statut Membre Dernière intervention   162
 
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
0