如何在Excel中删除下拉列表中的值时自动显示默认值？

在Excel中，我们经常会使用下拉列表来限制输入内容，但是删除下拉列表中的选项时，可能会出现空白单元格，这会影响表格的美观度和数据的准确性。本文将介绍如何在Excel中删除下拉列表中的值时自动显示默认值，让表格变得更加美观和规范化。

第一步：创建下拉列表

首先，我们需要创建一个下拉列表。以A1单元格为例，如下所示：

1. 选择单元格A1；
2. 依次点击“数据”-“数据验证”-“设置数据验证”选项卡；
3. 选择“列表”选项；
4. 在“来源”框中输入下拉列表的值，例如“北京”、“上海”、“广州”、“深圳”。

以下是示例代码（代码语言：Excel VBA）：

Sub CreateDropDownList()
    With Range("A1").Validation
        .Delete
        .Add Type:=xlValidateList, _
        AlertStyle:=xlValidAlertStop, _
        Operator:=xlBetween, _
        Formula1:="北京,上海,广州,深圳"
        .IgnoreBlank = False
        .InCellDropdown = True
        .InputTitle = "请选择一个城市"
        .ErrorTitle = "输入有误"
        .InputMessage = "请选择一个城市"
        .ErrorMessage = "您输入的内容不在下拉列表中"
        .ShowInput = True
        .ShowError = True
    End With
End Sub

第二步：新建命名区域

将下拉列表的值建立一个命名区域，这样方便在公式中进行调用。以本例中的下拉列表为例，我们可以将其命名为“Cities”。

以下是示例代码（代码语言：Excel VBA）：

Sub CreateNamedRange()
    ThisWorkbook.Names.Add Name:="Cities", RefersToR1C1:="=Sheet1!R1C1:R4C1"
End Sub

第三步：设置默认值

在单元格中输入以下公式，就可以在删除下拉列表中的选项时自动显示默认值了。默认值即为命名区域中的第一个值，本例中为“北京”。

以下是示例代码（代码语言：Excel公式）：

=IF(ISBLANK(A1), INDEX(Cities, 1), IFERROR(VLOOKUP(A1, Cities, 1, FALSE), INDEX(Cities, 1)))

结论

本文详细介绍了如何在Excel中删除下拉列表中的值时自动显示默认值。通过本文的学习，我们可以使表格更加美观、规范化，减少人为误差，提高工作效率。