Nova said:
How to delete delete all forms in my database by coding
What a bizarre thing to do. I don't particularly want to
test this, so take it as air code.
With CurrentProject.AllForms
For k = 1 To .Count
If Item(0).IsLoaded Then
DoCmd.Close acForm, .Item(0).Name, acSaveNo
End If
DoCmd.DeleteObject acForm, .Item(0).Name
Next k
End With