Событие Double click

[Mart222]

Добрый день, уважаемые гуру.

Возник вопрос, вроде небольшой - но никак не могу решить.

Суть - по дабл клику на ячейку появляется форма с ListBox. Режим выбора значений ListBox - MultiSelect. Если дабл клик приходится на ячейку поверх которой всплывает форма (форма всплывает в центре экрана, поэтому кликнуть нужно в центре), то в форме выбирается пара значений - первое и позиция над которой кликнули. При этом клик был еще до того как загрузилась форма и я его отменяю установкой параметра в событии Cancel = True.
Проблема в том, что я загружаю определенный набор выделенных значений при предыдущем запуске формы в ListBox (в примере это условно 3 и 6) и эти ложные клики на списке мне все портят, так как выбираются лишние значения.

Возможно, есть идеи каким образом не допустить выбора лишнего в списке.

Спасибо.

[exceleved]

Введите задержку 0,1 секунды перед UserForm1.Show

Код Выделить Развернуть

Dim t!: t = Timer + 0.1!
Do While Timer < t
  DoEvents
Loop


[Mart222]

Огромное спасибо, Ваш способ замечательно работает.
Потратил кучу времени, с задержкой тоже экспериментировал, но видимо не в ту сторону. А все решается более чем просто и элегантно. Тем не менее природа данной проблемы так и осталась не ясна мне.
Еще раз спасибо.