Как удалить форму программно из файла Excel?

[HotSpot]

Как удалить форму программно из файла Excel?

Как удалить текст модуля я знаю:

Sub DeleteModule(m)
с = Workbooks("Book1").VBProject.VBComponents(m). _
CodeModule.CountOfLines
Workbooks("Book1").VBProject.VBComponents(m). _
CodeModule.DeleteLines 1, с
End Sub

а вот форму удалить не получается... Это нужно для уменьшения объема файла, созданного на основе шаблона.

[echo]

ThisWorkbook.VBProject.VBComponents.Remove _
ThisWorkbook.VBProject.VBComponents.Item("UserForm1")

[HotSpot]

echo, большое спасибо!