Открываем книгу
Находясь в редакторе Microsoft Excel нажимаем комбинацию клавиш «Alt» - «F11»
Слева кликаем на «ЭтаКнига»
В открывшееся окошко вставляем:
Private Sub Workbook_Open()
If Not ActiveWorkbook.MultiUserEditing Then
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, accessMode:=xlShared
End If
End Sub
Нажимаем сохранить
Выбираем тип файла: Книга Excel c поддержкой макросов
Заходим «Параметры Excel» / «Центр управления безопасностью»/ «Параметры центра управления безопасностью»/ Включить все макросы/ ОК
Находясь в редакторе Microsoft Excel нажимаем комбинацию клавиш «Alt» - «F11»
Слева кликаем на «ЭтаКнига»
В открывшееся окошко вставляем:
Private Sub Workbook_Open()
If Not ActiveWorkbook.MultiUserEditing Then
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, accessMode:=xlShared
End If
End Sub
Нажимаем сохранить
Выбираем тип файла: Книга Excel c поддержкой макросов
Заходим «Параметры Excel» / «Центр управления безопасностью»/ «Параметры центра управления безопасностью»/ Включить все макросы/ ОК