Salut à tous
je veux tester l'existence d'une table. si elle existe je l'efface.
Je fais ceci mais j'ai le message : Objet requis
pourquoi?
Dim tbl1 As ADOX.Table
' Enumère toutes les tables du catalogue
For Each tbl1 In cat.Tables
If tbl1.Name = "tempo" Then
TableExists = True
Exit For
End If
Next
Set tbl1 = Nothing
