У меня есть файл с 2 кнопками, одна для «Показать анкету» и одна для «Показать ответы». «Показать анкету» показывает анкету с вопросами для ответов «Показать ответы» показывает ответы на каждый вопрос
В момент первого открытия файла кнопка «Показать ответы» скрыта
Затем, когда кто-то заполняет анкету и отправляет свои ответы, следующий код должен запускаться
Worksheets("Questionnaire").Activate
ActiveSheet.Buttons("Button 3").Visible = True
ActiveWorkbook.SaveAs Filename:="Folder where a copy of the questionnaire with the answers is saved") & ".xlsb", FileFormat:=xlExcel12, Password:="123", CreateBackup:=False
Worksheets("Questionnare").Activate
ActiveSheet.Buttons("Button 3").Visible = False
MsgBox "Thank you for your submission", vbOKOnly
ActiveWorkbook.Close
Этот код делает кнопку видимой, затем создает копию и сохраняет ее в папке с паролем (поэтому кнопка доступна только в этом новом файле для людей, у которых есть пароль к файлу), а затем делает кнопку невидимой в исходный файл, поэтому, когда новый человек пытается ответить на вопросник, кнопка «Показать ответы» не отображается для него.
Моя проблема в том, что в настоящий момент код делает кнопку видимой, сохраняет файл, открывает новый файл и затем делает кнопку невидимой в новом файле ra чем в исходном файле.
Как я могу остановить опцию «SaveAS» при открытии новой книги после ее сохранения? как сделать так, чтобы кнопка «Показать ответы» не отображалась в исходном файле?