[VBA] bouton supprimer
alex86
Messages postés
2
Statut
Membre
-
freto Messages postés 1543 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
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
-
juste après la virgule t'as le signe ' ; supprime l'apostrophe en question et relance
-
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 -
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
