| Цитата |
|---|
| написал: сделаю такую приписку, чтоб без этого ничего не будет работать |
Как вариант можно сделать вот так - см.файл.
При разрешенных макросах пользователю отобразиться лист "опрос", при неразрешенных - лист с инструкцией "как включить макросы".
ps успешно применяю такой способ на своих пользователях (8
в модуль Книги код:
| Код |
|---|
Private Sub Workbook_Open()
Sheets("опрос").Visible = True
Sheets("settings").Visible = xlSheetVeryHidden
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("settings").Visible = True
Sheets("опрос").Visible = xlSheetVeryHidden
ThisWorkbook.Close SaveChanges:=True
End Sub
|
Удивление есть начало познания © Surprise me!
И да пребудет с нами сила ВПР.
И да пребудет с нами сила ВПР.