Можем ли мы сделать автоматическое заполнение раскрывающегося списка при выборе раскрывающейся ячейки?

Question

Я сделал раскрывающийся список с помощью проверки данных (не использовать Combobox Active-X control). Я не уверен, что мы можем позволить раскрывающемуся списку автоматически заполнять список, когда мы щелкаем по ячейке, вместо того, чтобы щелкать маленькую стрелку, чтобы получить доступ к списку внутри нее?

   A

---

2 | (A2) | V |

---

Нажмите на ячейку A2 затем автоматически заполняется выпадающий список (вместо щелчка | v |)

Я знал, что в Excel VBA есть обработчик событий, но вижу код, который я не знаю, как я могу настроить или изменить использование для своих целей.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A2", Range("A" & Rows.Count).End(xlUp))) 
        Is Nothing Then
            Application.EnableEvents=False
            If Target="Closed" Then
                Target.EntireRow.Copy Sheet2.Range("A1").End(xlDown)(2)
                Target.EntireRow.Delete
            End If
        End If
        Application.EnableEvents=True
End Sub

Мне нужен метод проверки данных, потому что я не хочу помещать активный элемент управления x в свой рабочий лист.