在一系列单元格中填充用户表单上的组合框

Question

我正在尝试使用工作簿中另一个工作表中的一系列单元格填充combobox（称为＆＃34;其他＆＃34;）。

我使用以下作为guide，但它似乎不起作用。有人可以给我建议吗？当我运行userform时，combobox没有填充任何内容。

Private Sub ComboBox1_Change()
    Me.ComboBox1.List = Worksheets("Other").range("C2:C11").Value
End Sub

Answer 1

您使用的是错误的事件过程Private Sub UserForm_Initialize() ComboBox1.List = [Other!C2:C11].Value End Sub 。仅当组合框改变值时才会触发。

而是在userform初始化时加载列表：

public class OpeningYearViewModel
{
    public int OpeningYearId { get; set; }
    public string Description { get; set; }
    public List<Grade> GradesList { get; set; }
}

public class Grade
{
    public int GradeId { get; set; }
    public string Name { get; set; }
    public int CurrencyId { get; set; }
    public int Cost { get; set; }
}