小编Bhu*_*n K的帖子

我在工作表上使用“生成”按钮。当我单击该按钮时，会出现一个弹出窗口（表单），其中包含两个组合框。根据第一个组合框中的选择，填充第二个组合框选项列表。

对于第一个组合框，当我对项目值进行硬编码时，它工作正常。表单代码如下：

Private Sub UserForm_Initialize()

With ComboBox_DL
    .AddItem "DL1"
    .AddItem "DL2"
End With

End Sub

我尝试通过使用以下表单代码从 Excel 工作表中的列中获取组合框项目值来使此项目列表动态化：

Private Sub UserForm_Initialize()

With ComboBox_DL
For Each c In ActiveSheet.Range(Range("AE"), Range("AE").End(xlDown))
 .AddItem c.Value
Next
End With

End Sub

但上面的代码抛出错误：运行时错误'1004'：对象'_Global'的方法'Range'失败

I modified the code adding sheet details: 
With ComboBox_DL
    For Each c In ThisWorkbook.Worksheets("Business_Input_Data").Range(Range("AE"), Range("AE").End(xlDown))
        .AddItem c.Value
Next

它仍然抛出相同的错误。

有人可以帮忙吗？另外，我想知道如何查找与组合框1中的选择相对应的值并填充组合框2中的列表？