Type mismatch, run-time error 13 в Экселе, а в Ворде нет???

[SashaCrane]

На форме лежит листбокс и кнопка
имеем процедуру

Private Sub CommandButton1_Click()
Dim lb As ListBox
Set lb = ListBox1
MsgBox (lb.ListCount)
End Sub

В Ворде работает ав Экселе НЕТ! После вылета ошибки Type mismatch 13
жму Дебаг и подводя мышой к
Set lb = ListBox1
Над ListBox1 высвечивается Null

Чего не так? Проверил Referenses в Экселе есть все те которые есть в Ворде и даже больше...
Как решить эту проблему? У меня Office XP

[alibek]

Попробуй указать Dim lb As Control

[SashaCrane]

Спасибо. Заработало.