Спасибо. Все работает!
Только появилась еще одна проблема:
При выполнении процедуры удаления OLE Объектов - удаляется это диалоговое окно, которое, как я понимаю, не является OLE объектом.

Процедура:

For Each objOle In Worksheets(2).OLEObjects
If objOle.Name <> UserForm6.Name Then objOle.delete
Next objOle

даже описал так, но всеравно окно закрывается... Подскажите пожалуста - почему? Что надо прописать, чтобы оно не закрывалось?

(Eriksson)

Самое интересное, что если в рабочей области нет OLE объектов, то все нормально, а если они там есть, то удаляются они и диалоговое окно.

Извините - окно исчезает не при удалении, а после завершения процедуры CommandButton4_Click() , так как если ставим Msgbox - то при выскакивании диалогового окна Msgbox - окно еще существует... но... вот потом... что происходит потом? почему оно пропадает ?

Private Sub CommandButton4_Click()

For Each objOle In Worksheets(2).OLEObjects
If objOle.Name <> UserForm6.Name Then objOle.delete
Next objOle

MsgBox ("stop")

End Sub

Проблема заключается в следующем:
Если окно Userform1 выводиться со следующим свойством:
UserForm1.Show vbModeless
то появляется косяк... - при выполнении процедуры удаления OLE объектов, закрывается и само окно UserForm1.
Если же окно UserForm1 открывать со стандартной настройкой:
UserForm1.Show vbModal
то все работает нормально - окно не закрывается...
Но мне то надо, чтобы был режим vbModeless - чтобы с запуском диалогового окна можно было бы обращаться к ячейкам книги Exel'a.

Подскажите пожайлуста решение данной проблемы? Является ли это мой косяк? или же это косяк VB?

Спасибо большое,

1. Панель инструментов - впринципе можно переделать, но это будет каряво, так как у меня в этом Userform находятся не только командные кнопки, но и поля информации. В добавок - есть один случай, который предусматривает создание и удаление кнопок в этом диалоговом окне...

2. А есть какой-то патч или может все корректно будет работать на MS Office 2007 ?

3. Если не создавать OLE объекты, а делать их невидимыми - насколько это может отрозиться на работоспособности, когда все объекты невидимые и не используются... Как быстро прорисовывается окно ? Так же как и обычно или же это отразится на скорости прорисовки окна, даже если они будут невидимыми... Дело в том, что у меня в зависимости от выборки могут создаваться до 2000 ComboBox'ов, и CkeckBox'ов - это означает, что мне зачастую придеться держать 2000 объектов невидимыми.