Всем привет. В книге Excel в ЭтаКнига написал Private Sub Workbook_Open и программу, которая должна выполняться при открытии книги. Кроме того, в этой же книге создал модуль класса с таким кодом:
Public WithEvents App As Application
Private Sub App_WorkbookOpen(ByVal wb As Workbook)
Application.DisplayAlerts = False
End Sub
Private Sub App_WorkbookBeforeClose(ByVal wb As Workbook, _
Cancel As Boolean)
ActiveWorkbook.Saved = True
End Sub
Эта книга содержит связи с другими книгами. При запуске книги выдает сообщение: "Эта книга содержит одну или несколько связей, которые не могут быть обновлены..." и 2 кнопки Продолжить и Изменить связи. После нажатия кнопки Продолжить запускается программа, которая написана в процедуре Private Sub Workbook_Open.
Вопрос: можно ли сделать так, чтобы при открытии книги сообщение: "Эта книга содержит одну или несколько связей, которые не могут быть обновлены..." не выдавалось, то есть, чтобы сразу запускалась программа, которая написана в процедуре Private Sub Workbook_Open?