is there any way of erasing all data on an access sheet??
Printable View
is there any way of erasing all data on an access sheet??
Whats an Access sheet?
sorry, access database
Do you want to delete all data in all tables quickly? (I assume that because deleting the .MDB itself is just a one liner.)
First, load all of the table names in to a Listbox, or something like that, and then loop through the listbox inserting each entry into a one line SQL statement.
Dim SQL As String
Dim i As Integer
For i = 0 to List1.ListCount - 1
SQL = "DELETE FROM " & List1.List(i)
DatabaseObject.Execute SQL
Next