用户窗体运行时错误“13”上的组合框答案

【问题标题】：ComboBox on Userform Runtime Error "13"用户窗体运行时错误“13”上的组合框
【发布时间】：2018-11-09 09:36:41
【问题描述】：

在下面的代码中，我有一个运行时错误 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

【问题讨论】：

我无法复制，对我来说很好。
您认为其余代码可能有问题吗？
我也无法重现，当您单击“调试”时，是否有任何特定的代码行或部分代码突出显示？
我投票结束了这个问题，因为它不能再被复制了。

标签： vba excel for-loop userform

【解决方案1】：

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

【讨论】：