ник: osmor
ну тогда примерно так
http://hiprog.com/index.php?option=com_content&task=view&id=621
идея такова, скрыть поле со списком оставив только "треугольничек"
а на его место установить поле без возможности получения фокуса
1. Me.ПолеСоСписком = Me.ПолеСоСписком0.ItemData(3)
2 . Debug.Print Me.ПолеСоСписком0.ListIndex
не забываем, что все начинается с 0