Conditonal DeleteObject in MS Access Macros 1

[tlham]

I would like to delete a table in an Access Macro to use again. The problem is if the table is not there Access stops with an error. I can not find a conditional statement that will allow me to run the macro, delete the table and continue on whether the table previously existed or not.

 

[JerryKlmns]

How about VBA and not Macro?

Sub KillTable(strTableName As String)

On Error Resume Next
Err.Clear
DoCmd.DeleteObject acTable, strTableName
If Err <> 0 Then
   MsgBox "Table " & strTableName & " Not Found"
Else
   MsgBox "Table " & strTableName & " Found and Deleted"
End IF
End Sub

You could call the Sub from the click event of a button like

Call KillTable txtTableName.Value

using a textbox, named txtTableName, to hold the name of the table to delete.