Очистка списка имен UserForm из памяти

[iNataliya]

Всем доброго времени суток,
Помогите, пожалуйста, вот с таким вопросом:

У меня есть программа которая добавляет в книгу новую форму:

Private Sub CreateUserForm(zag, nam)
With ThisWorkbook.VBProject.VBComponents .Add(3)

.Properties(42) = 500
.Properties(43) = 400
.Properties("Caption") = zag
.Name = "UF" & nam
End With
End Sub

Затем созданная форма удаляется.
Так вот получается, что создать новую форму под тем же именем, что и только что удаленная форма, уже нельзя, хотя самой формы в проекте нет. Выпадает ошибка 75 "Could not find the specified object". Но если книгу закрыть и снова открыть, то форма замечательно создается. Я так понимаю что есть где-то в памяти список имен форм, который очищается если книгу перегрузить. Подскажите пожалуйста, есть способ очистить эту память? Спасибо.

[VictorM]

А если попробовать при удалении формы написать в конце

Name = ""

или наоборот, при создании новой формы

Private Sub CreateUserForm(zag, nam)
With ThisWorkbook.VBProject.VBComponents .Add(3)
.Name = "" 
.Properties(42) = 500
.Properties(43) = 400
.Properties("Caption") = zag
.Name = "UF" & nam
End With
End Sub

Конечно с примером файла было бы проще, а так - только догадки

[iNataliya]

Сообщение от VictorM

А если попробовать при удалении формы написать в конце

Name = ""

или наоборот, при создании новой формы

Private Sub CreateUserForm(zag, nam)
With ThisWorkbook.VBProject.VBComponents .Add(3)
.Name = "" 
.Properties(42) = 500
.Properties(43) = 400
.Properties("Caption") = zag
.Name = "UF" & nam
End With
End Sub

Конечно с примером файла было бы проще, а так - только догадки

Не получается, и дело видимо даже не в файле сейчас в пустую книгу добавляю 3 формы UserForm1, UserForm2, UserForm3
затем называю через свойства
UserForm1 - UserForm4 - нормально работает
UserForm2 - UserForm1 - нормально работает
удаляю UserForm3
пытаюсь переназвать UserForm1 - UserForm3 - выдает ошибку pass/file access error и лечится только закрытием и открытием книги.
Можно эту ошибку как-то обойти?

[iNataliya]

Все получилось!!!
Правда не знаю, наверное через неправильное место.
Сразу после удаления формы добавила код сохранения книги
ActiveWorkbook.Save
и все заработало

[EducatedFool]

Вопрос, конечно, не в тему, но всё же:
а зачем программно создавать форму?

Вот я постоянно пишу макросы, и ни разу не потребовалось так извращаться.
Можно же вручную один раз создать эту форму, а потом отображать (меняя заголовок и другие параметры)
Можно и несколько копий одной формы отобразить (пример), с разными заголовками:

dim F as new Userform1
F.show ' как-то вроде так это делается