Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Защитить лист в VFP / 3 сообщений из 3, страница 1 из 1
28.10.2008, 09:29
    #35619486
Алена_О
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Защитить лист в VFP
Мне подсказали ранее как защитить лист в Еxcel средствами VFP:
ex.Workbooks(1).ActiveSheet.Protect(,.f.,.t.,.f.)
но в данном случае нельзя изменять длину, ширину солбцов ...

Я попыталась так:

WITH .ActiveSheet.Protect
.DrawingObjects=.F.
.Contents=.T.
.Scenarios=.F.
.AllowFormattingCells=.T.
.AllowFormattingColumns=.T.
.AllowFormattingRows=.T.
.AllowInsertingColumns=.T.
.AllowInsertingRows=.T.
.AllowInsertingHyperlinks=.T.
.AllowDeletingColumns=.T.
.AllowDeletingRows=.T.
.AllowSorting=.T.
.AllowFiltering=.T.
.AllowUsingPivotTables=.T.
ENDWITH

Но не работает. Подскажите: где неверно.
...
Рейтинг: 0 / 0
28.10.2008, 10:55
    #35619749
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Защитить лист в VFP
Неврно то, что вы рассматриваете DrawingObjects, Contents, и т.п. как некие свойства объекта Protect. А на самом деле - это всего-лишь имена параметров метода Protect. Т.е. вам надо как и раньше, выполнять

Код: plaintext
ex.Workbooks( 1 ).ActiveSheet.Protect(,.f.,.t.,.f.) 

расставив .T. и .F. на нужных местах. По порядку следования параметров в методе Protect(). Для ваших настроек примерно так:

Код: plaintext
ex.Workbooks( 1 ).ActiveSheet.Protect(,.f.,.t.,.f.,.t.,.t.,.t.,.t.,.t.,.t.,.t.,.t.,.t.,.t.) 
...
Рейтинг: 0 / 0
28.10.2008, 11:38
    #35619894
Алена_О
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Защитить лист в VFP
Спасибо. Все нормально. Я так пробовала, но видно ошиблась в перечислении.
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Защитить лист в VFP / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]