excel - 我可以将 Excel 组合框设置为默认值吗？

Question

我的组合框(名为ddDatabase)可以有两个值之一。这两个值是从单独工作表中的表中提取的。但是，当我打开 Excel 文件时，这两个值都没有被选择。相反，组合框显示为空。有什么方法可以显式地将特定值设置为默认值吗？

经过一些进一步的测试，如果保存 Excel 文件并选择组合框的第一项，则下次打开文件时它将默认为空白。选择组合框中除第一个值之外的任何其他值将在保存、关闭和重新打开后保留选择。

我尝试使用 VBA 通过使用以下代码打开工作簿时设置值来解决此问题:

Sub Workbook_Activate()

    Dim ddDatabase As DropDown
    Set ddDatabase = ActiveSheet.DropDowns("ddDatabase")
    ddDatabase.Value = 1

End Sub

不幸的是，它抛出以下错误:

无法设置下拉类的 value 属性

有没有办法解决这个问题？

Answer 1

使用这个:

.ComboBox1.Text = .ComboBox1.List(1) 'Change the number to the value you want as default. 
'If you want to default to something like 'select a value' write it as a string

您必须在创建时自行指定值(或在打开工作簿时指定值，如果在表单中则在打开表单时指定值)。

编辑:

如果对您来说更灵活，您可能希望将其更改为验证列表:

    With f_overview.Range("cell_act").Validation 'Change this to something like Sheets("Sheet1").Range("A1").Validation
        .delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=Acteurs!$E$4:$E$23" 'Change this to "=Sheet1!$A$1:$A$2"
    End With

第一个注释行用于列表的放置，第二个注释行是您的源值(您的两个值)。