несанкционированное событие click

[siggizmund]

Добрый день!
Который день ломаю мозг над поведением формы. Расскажу по порядку:

1. После открытия формы, с помощью FileDialog выбираю один или несколько документов Word. Открываю их. Каждому открытому документу на форме назначается кнопка с именем этого документа (форма считывает открытые документы Word) - Кнопка1, Кнопка2 и т. д.

2. При нажатии на КнопкаN в соответствующий документ вставляется фотография.

3. Форма хранится в документе Дом, который фотографии не принимает, в этом документе сделана большая кнопка запуска формы, с макросом:

Sub Start()
Form1.Show
Form1.Unload
End Sub

4. В форме есть кнопка Exit:

Sub Exit_Click()
Form1.Hide
End Sub

Проблема: при нажатии Exit форма сама вставляет последнюю фотографию в отчеты ЕЩЕ РАЗ (дублирует последнюю вставку), а затем закрывается. Методом проб я установил, что срабатывает событие Click на одной из кнопок отчетов КнопкаN.
Если закрывать форму нажав на Х на окне формы, то появляется ошибка "Automation error" Invoked object disconnected - и перезагружается Word.

Явно при выходе что то происходит, а что - понять не могу.

P.S. После множественных тестов установил, что такое происходит только если я открываю документы Ворд, если просто подцепляю открытые, форма закрывается нормально. Но знание это мне не помогло....

[Вождь]

Трудно догадатся, что там в остальном коде, а для формы правильнее так:

Sub Start()
    Form1.Show vbModeless
End Sub

Sub Exit_Click()
    Unload Form1
End Sub

[siggizmund]

Сообщение от Вождь

Трудно догадатся, что там в остальном коде, а для формы правильнее так:

Sub Start()
    Form1.Show vbModeless
End Sub

Sub Exit_Click()
    Unload Form1
End Sub

Такой запуск безусловное элегантнее. Поставил, спасибо.
Ошибку тоже нашел:

Private Sub butReport1_Click()

If butReport1.Caption Like "Документ не назначен" Then
Call Открытие документа
Exit Sub
End If

Call Вставка (1)
Call Sound

End Sub

В этом коде был пропущен Exit Sub - отсюда несанкционированная вставка.