Problem: How do I delete an empty table by identifying a field in the table as null.
DoCmd.OpenTable "TableName"
If Field Is Null Then
DoCmd.Close acTable, "TableName"
DoCmd.DeleteObject acTable, "TableName"
Else
DoCmd.Close acTable, "TableName"
DoCmd.OpenForm "FormName"
End If
DoCmd.OpenTable "TableName"
If Field Is Null Then
DoCmd.Close acTable, "TableName"
DoCmd.DeleteObject acTable, "TableName"
Else
DoCmd.Close acTable, "TableName"
DoCmd.OpenForm "FormName"
End If