Pelena, я про Immediate не очень понял. Ввел ?AllowUsingPivotTables = True, AllowFiltering = True получил False False. Это что означает? Ну и пароля судя по If ActiveSheet.ProtectContents = False Then MsgBox "Test" вообще нет, хоть эксель его и спрашивает.
Pelena, я про Immediate не очень понял. Ввел ?AllowUsingPivotTables = True, AllowFiltering = True получил False False. Это что означает? Ну и пароля судя по If ActiveSheet.ProtectContents = False Then MsgBox "Test" вообще нет, хоть эксель его и спрашивает.RMMMM
Pelena, ActiveSheet.Unprotect False сработало, спасибо! Уже собирался все переделывать потеряв всякую надежду. Логично, эксель выполнил команду и результат ее был False, и он сделал это паролем. Непонятно почему If ActiveSheet.ProtectContents = False Then MsgBox "Test" выполняется, но это уже ради интереса, значения особо не имееет.
Pelena, ActiveSheet.Unprotect False сработало, спасибо! Уже собирался все переделывать потеряв всякую надежду. Логично, эксель выполнил команду и результат ее был False, и он сделал это паролем. Непонятно почему If ActiveSheet.ProtectContents = False Then MsgBox "Test" выполняется, но это уже ради интереса, значения особо не имееет.RMMMM