VBA et base de données sql
Bonjour le forum,
j'ai branché ma base de données sql avec excel via connector ODBC. Sur ce même fichier excel j'ai rajouté des cases à cocher.
Ce que je souhaiterai faire c'est que si je coche une case, et j'appuie sur un bouton Valider la ligne concernée seras supprimée de la base de données sql et du fichier excel.
Merci d'avance.
Amicalement
Bonjour,
Quelqu'un pourra m'aider.
Merci d'avance
Amicalement
Bonjour,
Une piste (pour une base MySql) :
Si tu as déclaré un objet oConnect :
Public oConnect As ADODB.Connection
Avec un script de connection, genre :
Private Sub ConnectionDB()
Dim S As String
Set oConnect = New ADODB.Connection
S = "DRIVER={MySQL ODBC 5.1 Driver};" & _
"SERVER=" & Sheets("config").Range("B1").Text & ";" & _
"DATABASE=" & Sheets("config").Range("B2").Text & ";" & _
"USER=" & Sheets("config").Range("B3").Text & ";" & _
"PASSWORD=" & Sheets("config").Range("B4").Text & ";" & _
"Option=3"
oConnect.Open S
End Sub
(donc ici avec des info dans la feuille "config")
Tu peux écrire un script de suppression, genre :
Sub SupprimerData()
Dim Rs As ADODB.Recordset
Dim Requete As String
Set Rs = New ADODB.Recordset
Call ConnectionDB
With Sheets(1)
Requete = "DELETE FROM maBase WHERE id=" & .Range("B2")
Rs.Open Requete, oConnect
End With
oConnect.Close
Set Rs = Nothing
End Sub
pour supprimer la fiche de la base maBase dont la valeur du champ id est en B2
(et je suppose que tu as installé précédemment le connecteur : http://dev.mysql.com/downloads/connector/odbc/5.1.html)
Bonne journée,
Bonjour Pierrep56, Bonjour le forum,
Merci bcp pour ta réponse.en fait j'ai connecté la base de données à Excel via ODBC connector et je l'ai configuré manuellement.
j'ai bien mes données sur excel ( ce n'est pas ça le problème) ce n'est pas la connexion à la base de données.
Ce que je souhaiterai faire, c'est que à chaque fois que je valide ou je rejette une ligne sur excel ( la feuille Table Excel), "cette feuille est alimentée par la base de données", je supprime la ligne en question de la base de données.
Ci joint le fichier en question.
Merci d'avance.
Amicalement