Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.13;
Скачать: CL | DM;

Вниз

Help. Exel. Как сделать WorkBook в Read-Only или запаролить?   Найти похожие ветки 

 
Andrey-k ©   (2003-02-02 22:45) [0]

Юзер после сздания Книги не должен иметь возможность ее редактировать. Создаю книгу примерно так :

Var
IWorkbook :Excel8TLB.Workbook;
FIXLSApp: Excel8TLB._Application
begin
IWorkbook := FIXLSApp.Workbooks.Add(EmptyParam, 0);


 
asmith   (2003-02-03 12:37) [1]

У объекта Workbook есть метод Protect, предназначенный для таких целей.
Кусочек из справки по Exel-VBA
-----------
Protects a workbook so that it cannot be modified.
expression.Protect(Password, Structure, Windows)
expression Required. An expression that returns a Workbook object.
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. It"s a good idea to keep a list of your passwords and their corresponding document names in a safe place.
Structure Optional Variant. True to protect the structure of the workbook (the relative position of the sheets). The default value is False.
Windows Optional Variant. True to protect the workbook windows. If this argument is omitted, the windows aren’t protected.


 
Andrey-k ©   (2003-02-04 21:57) [2]

Больше спасибо, будешь в РФ пиво поставлю.



Страницы: 1 вся ветка

Текущий архив: 2003.02.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.013 c
3-38088
Relict
2003-01-27 15:25
2003.02.13
Опять запись картинок на сервер


6-38417
romychk
2002-12-13 10:54
2003.02.13
Socket первое соединение


3-38107
Rule
2003-01-27 23:04
2003.02.13
Почему не работает программа с компонентами Интербейза


1-38369
Natalia
2003-02-03 23:32
2003.02.13
Поиск файла


1-38381
dimich1978
2003-02-04 09:18
2003.02.13
Два в одном.Помогите кто чем может