Question

我的电子表格中有一个Combobox。我试图从中获取所选值。但是没能这样做。

这些是我尝试的代码：

Range("A1")=ComboBox1.SelectedItem

和

Range("A1")=ComboBox1.Value

请帮助我。他们都没有工作。

这是我将项目添加到组合框的方式：

For i = 2 To lastnum        
    disName= ThisWorkbook.Sheets(final).Range(Col& i).Value        
    With wb21Tool.Sheets("Main").ComboBox1        
        .AddItem disName        
    End With        
Next

Answer 1

您需要完全限定对象，请尝试：

wb21Tool.Sheets("Main").Range("A1").Value = wb21Tool.Sheets("Main").ComboBox1.Value

或者，

With wb21Tool.Sheets("Main")
    .Range("A1").Value = .ComboBox1.Value 
End With

ComboBox.Value错误 - Excel VBA

1 个答案: