Userform运行时错误“13”上的ComboBox

Question

在我的代码下面，我有一个运行时错误13（类型不匹配）。我不知道是什么问题？我试图用表格名称填充组合框。 UserForm_Activate（）上出现错误。

Private Sub UserForm_Activate()
    Dim xSheet As Worksheet

    ComboBox2.Clear

    For Each xSheet In ActiveWorkbook.Sheets
        ComboBox2.AddItem xSheet.Name
    Next xSheet
End Sub

Private Sub UserForm_Initialize()
    Dim lblName As String
    Dim lblDate As String

End Sub

Answer 1

好吧问题是，我有一个Excel 5.0对话框表，我必须删除它才能使组合框崩溃。 感谢@dwirony，你带我到了这个想法！