Discussion :

[Mou]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[Invité]

Bonjour

Comment te connectes-tu à ta base ?

Montre nous le code.

Starec

[popo68]

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.

[Mou]

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

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ?

[Mou]

Personne pour une reponse ?