替换 Excel 中的数据验证选择

Question

我有一个包含该物品全名的列表，旁边还有一个包含该物品简称的列表。

我想创建一个下拉列表，其中它将显示长名称，但在选择时仅显示短名称。

有什么办法吗？

Answer 1

这将需要 VBA。考虑以下场景：

D 列中的数据验证由 A 列中的 LongList 值提供。

工作表更改事件将作用于 D 列，执行 Vlookup 以获取短值并替换当前单元格的值。代码如下：

Private Sub Worksheet_Change(ByVal Target As Range)
Dim short As String
    If Not Intersect(Target, Range("D:D")) Is Nothing Then
        short = Application.VLookup(Target.Value, Range("A1:B4"), 2, False)
        Application.EnableEvents = False
        Target = short
        Application.EnableEvents = True
    End If
End Sub

右键单击 Sheet 选项卡并选择“查看代码”。将上述代码粘贴到代码窗口中。调整单元格引用以反映您的工作簿。