1С и Excel. Как включить программно автофильтр для защищенного листа #545360


#0 by 2S
Книга.ActiveSheet.Protect("Пароль"); Надо установить защиту листа с возможностью использования автофильтра. Какой синтаксис Protect? Ставил и 1 после пароля, тогда вообще открывает весь лист на редактирование.( Такая возможность есть в экселе если интерактивно защищать лист. В макросе ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _ Как в 1С реализовать?
#1 by 2S
гуру VBA имеются?
#3 by 2S
ап
#4 by 2S
подниму еще разок
#5 by KishMish
в редакторе ВБА нажми а1 и ищи протект. там куча параметров Name Required/Optional Data Type Description Password Optional Variant A string that specifies a case-sensitive password for the worksheet or workbook. If this argument is omitted, you can unprotect the worksheet or workbook without using a password. Otherwise, you must specify the password to unprotect the worksheet or workbook. If you forget the password, you cannot unprotect the worksheet or workbook. DrawingObjects Optional Variant True to protect shapes. The default value is True. Contents Optional Variant True to protect contents. For a chart, this protects the entire chart. For a worksheet, this protects the locked cells. The default value is True. Scenarios Optional Variant True to protect scenarios. This argument is valid only for worksheets. The default value is True. UserInterfaceOnly Optional Variant True to protect the user interface, but not macros. If this argument is omitted, protection applies both to macros and to the user interface. AllowFormattingCells Optional Variant True allows the user to format any cell on a protected worksheet. The default value is False. AllowFormattingColumns Optional Variant True allows the user to format any column on a protected worksheet. The default value is False. AllowFormattingRows Optional Variant True allows the user to format any row on a protected. The default value is False. AllowInsertingColumns Optional Variant True allows the user to insert columns on the protected worksheet. The default value is False. AllowInsertingRows Optional Variant True allows the user to insert rows on the protected worksheet. The default value is False. AllowInsertingHyperlinks Optional Variant True allows the user to insert hyperlinks on the worksheet. The default value is False. AllowDeletingColumns Optional Variant True allows the user to delete columns on the protected worksheet, where every cell in the column to be deleted is unlocked. The default value is False. AllowDeletingRows Optional Variant True allows the user to delete rows on the protected worksheet, where every cell in the row to be deleted is unlocked. The default value is False. AllowSorting Optional Variant True allows the user to sort on the protected worksheet. Every cell in the sort range must be unlocked or unprotected. The default value is False. AllowFiltering Optional Variant True allows the user to set filters on the protected worksheet. Users can change filter criteria but can not enable or disable an auto filter. Users can set filters on an existing auto filter. The default value is False. AllowUsingPivotTables Optional Variant True allows the user to use pivot table reports on the protected worksheet. The default value is False. их все надо указывать с скобахпо порядку
#6 by KishMish
+ AllowFiltering - предпоследний
#7 by KishMish
+ нажми F1 то бишь хелп оно же тут вроде
#8 by 2S
да пробывал Книга.ActiveSheet.Protect("Пароль",,,,,,,,,,,,,,1); все равно не работает
#9 by 2S
+ Книга.ActiveSheet.Protect("123",0,1,1,1,0,0,0,0,0,0,0,0,1,1,0); блокируется весь лист все равно
#10 by KishMish
а макросом в Екселе работает? если да, то создай файл-шаблон с записанным макросом. его заполняй и вызывай макрос
#11 by 2S
макросом работает нафиг, макросом бух поработет, защитит лист с установленным флажком использования автофильтра сама :)
#12 by 2S
судя по всему фича какая-то находил темы похожие, проблма не решалась
#13 by KishMish
Есть макроязык в екселе (не ВБА) - возможно там можно будет установить через Application.ExecuteExcel4Macro(СрокаМакроЯзыка)
#14 by KishMish
думаю все из за того что тип параметра ВАРИАНТ. ты передаешь число, преобразования не происходит. как то так
#15 by KishMish
насчет макроса. можно написать макрос и вызвать его програмно из 1С комнадой RUN(ИмяПроцедуры)
#16 by KishMish
вот жэтот код уменя все нормально работает блокирует лист и разрешает фильтр
#17 by KishMish
#18 by Tatitutu
все намного проще это старая фича
#19 by KishMish
+ ексель 2007
#20 by FN
...
#21 by smaharbA
#22 by 2S
о, спасибо будет завтра чем заняться :)
Тэги: Админ
Ответить:
Комментарии доступны только авторизированным пользователям

В этой группе 1С