Как выделить listbox item под курсором мыши?

Привет всем!
Народ, такая проблема. Нужно реализовать слежение за курсором в листбоксе. Т.е., чтобы при наведении на элемент листбокса он автоматически выделялся.
Само слежение, ладно, сделал. Точнее, оно есть у элемента listbox формы: событие MouseMove. А дальше затык.
Как это сделать в VBNET(через sendMessage и listbox.hWnd вычислить высоту item, и дальше ясно) я уже много раз понял.
Возможно ли что-то подобное замутить в VBA Excel??