Проблема: При выделении ячейки с выпадающим списком (сделанном через проверку данных) нужно чтобы этот список автоматически раскрывался. Сделал это при помощи If Target ... Then Application.SendKeys ("%{UP}")
В результате список раскрывается, когда входишь в ячейку, но теперь чтобы самому вводить свой текст в эту ячейку (т.е. если в выпадающем списке нет нужного тебе варианта) приходится аж три раза по ней кликать.

Хотелось бы: чтобы выпадающий список раскрывался автоматически при выделении ячейки (чтобы было видно, какие есть варианты), но при этом в первую очередь можно было бы сразу вводить текст в эту ячейку без лишних кликов, а вот для того, чтобы выбирать из списка можно, наоборот, и сделать какие-либо действия.

Почему именно так: задача усовершенствовать программу для введения данных для медицинской документации. В этих условиях есть 2 особенности:
1) так получается, что, примерно, 50% данных встречаются часто у многих больных (в примере, например, я написал самые частые жалобы), соответственно , их удобнее выбирать из списка, а 50% - редкие или даже уникальные, т.е. их явно быстрее вписать самому. Поэтому нужно иметь два вида ввода в каждой ячейке.
2) очень важен вопрос времени (т.к. пунктов очень много (более 500), а времени на больного - мало) и каждое лишнее действие, если брать все пункты, даст значимую прибавку времени в итоге.

Буду рад идеям, как можно преодолеть решить данную задачу. Заранее спасибо!