[AUTOMATION]Effacer des donnees de ma base a partir de Excel VBA

J'ai un pequeno probleme mais qui m empeche d avancer sur ma base... POur vous situer un peu je lance mon programme VBA dans Excel et il interagit directement avec ma base de données Access...

Voici mon code pour supprime une liste de nom de la base...

Code:

---

1 2 3 4 5

Dim strSql1 As String   strSql1 = "DELETE * FROM CLOLoan WHERE NomCLO=" & Nomchoisi DoCmd.RunSQL strSql1

---

Mon programme em dit que la base n est pas ouverte... je ne sais pas ou est le probleme...

Merci

Moumou

Bonjour

Comment te connectes-tu à ta base ?

Montre nous le code.

Starec

Bonjour,

Il ne faut pas simplement exécuter une requête en SQL sous excel, il faut au préalable te connecter à celle ci pour que ton instruction SQL s'exécute.

Bonjour et merci de la reponse... Bon je suis pas super pro don soit ma base est ouverte grace à (normalement j espere)

Code:

---

1 2 3 4 5 6 7

Set cn = New ADODB.Connection cn.Open "Provider=Microsoft.jet.oledb.4.0;" & "Data Source=Q:\Portefeuille\CDO\Suivi Portefeuilles\Suivi portefeuille.mdb"     Set rs = New ADODB.Recordset rs.Open "CLOLoan", cn, adOpenKeyset, adLockOptimistic, adCmdTable

---

Qu'en penses tu ?

Personne pour une reponse ?