DeleteObject

Deletes a database object.

Syntax

DoCmd.DeleteObject([ObjectType][, ObjectName])

with the following parameters:

ObjectType

An AcObjectType constant indicating the type of object to delete. Possible values are acDataAccessPage, acDefault (the object selected in the Database window), acDiagram, acForm, acFunction, acMacro, acModule (a VBA module), acQuery, acReport, acServerView, acStoredProcedure, and acTable.

ObjectName

The name of the object of type ObjectType to be deleted.

Example

The example cycles through backup tables (tables that include “Backup” in the filename), prompts the user whether each should be deleted, and deletes the table if the user responds affirmatively.

Public Sub DeleteBackupTables()   Dim tbl As Variant     ' Iterate tables   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

Comments

• If no object type or object name is specified, Access deletes the object selected in the Database window. This can be controlled programmatically with the DoCmd.SelectObject method.

• If ObjectName does not exist, Access generates runtime error 7874.