Всем здравствуйте,
По событию SelectionChange cоздаю на листе элемент управления ComboBox. После завершения использования ComboBox необходимо удалить его с листа. Событие листа Change не подходит, так как ComboBox связан с ячейкой и изменение листа начинается с первой буквы. Нужно еще событие по которому можно удалить ComboBox. Для этого попытался присвоить ComboBox переменной и создать события для нее:
Public WithEvents oleObj As OLEObject
Private Sub oleObj_LostFocus()
oleObj.Delete
End Sub
Но VBA ругается Выдавая ошибку 459 "Object or class does not support the set of events"
Где-то вычитал, что если объект на листе один можно воспользоваться зарезервированным именем переменной newCtl, но тоже не работает
Private Sub newCtl_LostFocus()
Me.OLEObjects("newCtl").Delete
End Sub
Вопрос есть ли возможность создать события для переменной объекта OLE.
Спасибо,
Владимир.
По событию SelectionChange cоздаю на листе элемент управления ComboBox. После завершения использования ComboBox необходимо удалить его с листа. Событие листа Change не подходит, так как ComboBox связан с ячейкой и изменение листа начинается с первой буквы. Нужно еще событие по которому можно удалить ComboBox. Для этого попытался присвоить ComboBox переменной и создать события для нее:
Public WithEvents oleObj As OLEObject
Private Sub oleObj_LostFocus()
oleObj.Delete
End Sub
Но VBA ругается Выдавая ошибку 459 "Object or class does not support the set of events"
Где-то вычитал, что если объект на листе один можно воспользоваться зарезервированным именем переменной newCtl, но тоже не работает
Private Sub newCtl_LostFocus()
Me.OLEObjects("newCtl").Delete
End Sub
Вопрос есть ли возможность создать события для переменной объекта OLE.
Спасибо,
Владимир.