Deletes a database object:DoCmd.DeleteObject([ObjectType][, ObjectName]) : DoCmd « Application « VBA / Excel / Access / Word






Deletes a database object:DoCmd.DeleteObject([ObjectType][, ObjectName])

 
Public Sub DeleteBackupTables()
   Dim tbl As Variant
   For Each tbl In CurrentData.AllTables
      If InStr(1, tbl.Name, "Backup", vbTextCompare) > 0 Then
         If vbYes = msgBox("Delete table " & tbl.Name & "?", vbYesNoCancel Or vbQuestion, "Confirm Table Deletion") Then
            DoCmd.DeleteObject acTable, tbl.Name
         End If
      End If
   Next
End Sub

 








Related examples in the same category

1.Open a report
2.Save changes to the client record
3.Undo changes made to the current record
4.Closes the window of an Access object: DoCmd.Close([ObjectType][, ObjectName][, Save])
5.Copies a database object into the same or another database: DoCmd.CopyObject([DestinationDatabase][, NewName][, SourceObjectType][, SourceObjectName])
6.Using the DoCmd Object to Programmatically Add Sections to Reports at Runtime
7.Use DoCmd.OpenForm to open a form
8.Use DoCmd to close a form
9.Setting a Focus
10.Finding a Record
11.Validating a Record
12.Use DoCmd to open a form
13.Makes a sound using the computer's built-in speaker.
14.Using the DoCmd Object to Run Commands
15.Sending Mail
16.Calling the Report from VBA
17.DoCmd.Echo