![取代 Excel 中的資料驗證選擇](https://rvso.com/image/1452876/%E5%8F%96%E4%BB%A3%20Excel%20%E4%B8%AD%E7%9A%84%E8%B3%87%E6%96%99%E9%A9%97%E8%AD%89%E9%81%B8%E6%93%87.png)
我有一個包含項目全名的列表,旁邊還有一個包含項目短名稱的列表。
我想建立一個下拉列表,它將顯示長名稱,但在選擇時僅顯示短名稱。
有辦法做到這一點嗎?
答案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
右鍵單擊工作表標籤並選擇“查看代碼”。將以上程式碼貼到程式碼視窗中。調整儲存格引用以反映您的工作簿。