UserForm пропадает в момент программного удаления листа. VBA

Формулировка задачи:

Я пытаюсь создать подобие навигатора по листам с помощью UserForm, поскольку листов в книге очень много и ходить по ним неудобно. Всё работает замечательно: выбираю в списке на UserForm название листа и тот активируется. Но листы периодически теряют актуальность, в таком случае я нажимаю кнопку на листе, нужные данные переносятся в разные таблички, а сам лист удаляется. И почему-то в этот момент закрывается UserForm, хотя нигде в коде такого не прописано. Если я удаляю лист вручную - UserForm не закрывается. Я попробовала перенести UserForm в отдельную книгу, но в таком случае непонятно, как к нему обратиться из основной книги... Буду благодарна за советы и науку:)

Решение задачи: «UserForm пропадает в момент программного удаления листа. VBA»

textual
                            Листинг программы 
                        

                            Private Sub CommandButton1_Click()
Application.DisplayAlerts = False
ActiveSheet.Delete
Application.DisplayAlerts = True
End Sub

                        