[VBE]Effacer le contenu d'une table Access avec Excel

Je souhaiterais savoir s'il existe un moyen pour pouvoir effacer le contenu d'une table Access par le biais d'Excel.

Merci

bonsoir

il existe sans doute d'autres solutions, mais tu peux deja tester cette macro pour supprimer tous les enregistrements de la Table2

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Sub supprimerEnregistrementsTable()
'Necessite d'activer la reference
'Microsoft ActiveX Data Objects x.x Library
Dim Cn As ADODB.Connection
Dim Rst As ADODB.Recordset
Dim Requete As String
 
Set Cn = New ADODB.Connection
Set Rst = New ADODB.Recordset
 
Cn.Provider = "Microsoft.Jet.Oledb.4.0"
Cn.ConnectionString = "C:\Documents and Settings\michel\dataBase.mdb"
Cn.Open
 
Requete = "DELETE * FROM Table2"
Cn.Execute Requete
 
Cn.Close
Set Cn = Nothing
End Sub

bonne soiree
michel

ça fonctionne très bien merci beaucoup !!!;)