使用vba显示下拉列表中的第一项而不选择单元格

Question

从Data =＆gt;创建下拉列表时数据验证，Excel始终显示列表中的第一个项目。

但是，在vba中创建下拉列表时，单元格似乎为空，只有在单击它时，用户才会知道有一个下拉列表。

是否有可能让excel显示第一个项目，例如＆＃34;从下拉菜单中选择＆＃34;这样用户就会知道有一个下拉列表。

Answer 1

考虑：

Sub DVSetup()
    With ActiveCell.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="choose from drop down,alpha,beta,gamma,delta"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
    ActiveCell.Value = "choose from drop down"
End Sub