VBA - (Excel) Почему я не могу установить тип текстового поля для Userform без получения ошибки несоответствия типа?

Question

У меня есть Userform, и это код для моей кнопки управления. Попытка передать Textbox к функции, используя следующий код

Private Sub pdclear_Click() 
Dim textinput As TextBox 
Set textinput = frmBigInputBox 
Call clear(textinput) 
End Sub 

В строке выделены желтым цветом в режиме отладки является

Set textinput = frmBigInputBox 

Почему это приводит к «13» тип несоответствие ошибка ??? Что я делаю неправильно?

Answer 1

Попробуйте использовать MSForms.TextBox. Как в

Dim textinput As MSForms.TextBox 

Работы для меня.

Answer 2

я мог воспроизвести ошибку и нашел это: http://forums.devx.com/showthread.php?168758-Excel-VBA-Using-TypeOf

Таким образом, вы должны определить его как MSForms.TextBox, кажется.