Мастера DELPHI, Delphi programming community Рейтинг@Mail.ru Титульная страница Поиск, карта сайта Написать письмо 
| Новости |
Новости сайта
Поиск |
Поиск по лучшим сайтам о Delphi
FAQ |
Огромная база часто задаваемых вопросов и, конечно же, ответы к ним ;)
Статьи |
Подборка статей на самые разные темы. Все о DELPHI
Книги |
Новинки книжного рынка
Новости VCL
Обзор свежих компонент со всего мира, по-русски!
|
| Форумы
Здесь вы можете задать свой вопрос и наверняка получите ответ
| ЧАТ |
Место для общения :)
Орешник |
Коллекция курьезных вопросов из форумов
KOL и MCK |
KOL и MCK - Компактные программы на Delphi
Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / rsdn.org

 
Чтобы не потерять эту дискуссию, сделайте закладку « предыдущая ветвь | форум | следующая ветвь »

Защита группы ячеек листа excel [D7, WinXP]


Вячеслав   (04.02.13 16:07

Этот код должен блокировать только заданную в range группу ячеек:

 Source_xls.Sheets[1].Activate;
 Sheet := Source_xls.Sheets[1];
 Range := Sheet.Range['A1:E2'];
 Range.FormulaHidden := False;
 Range.Cells.Locked := True;
 Source_xls.ActiveSheet.EnableSelection := xlUnlockedCells;      // выбирать только незаблокированные
 Source_xls.ActiveSheet.Protect('123');

В результате блокируется весь лист.


Вячеслав   (04.02.13 17:05[1]

Отвечаю сам себе

Дело в том, что по умолчанию все ячейки листа заблокированы.
Прежде чем защитить заданную группу ячеек надо разблокировать
все другие ячейки или сначала разблокировать все.

Source_xls.Sheets[1].Activate;
Sheet := Source_xls.Sheets[1];
Range := Sheet.Range['A1:E100'];
Range.Cells.Locked := False;
Range := Sheet.Range['A1:E2'];
Range.FormulaHidden := False;
Range.Cells.Locked := True;
Source_xls.ActiveSheet.EnableSelection := xlUnlockedCells;      // выбирать только незаблокированные
Source_xls.ActiveSheet.Protect('123');

Все работает.


версия для печати

Написать ответ

Ваше имя (регистрация  E-mail 







Разрешается использование тегов форматирования текста:
<b>жирный</b> <i>наклонный</i> <u>подчеркнутый</u>,
а для выделения текста программ, используйте <code> ... </code>
и не забывайте закрывать теги! </b></i></u></code> :)


Наверх

  Рейтинг@Mail.ru     Титульная страница Поиск, карта сайта Написать письмо