Chiêu 40: Cho phép sử dụng tính năng Group and Outline trên bảng tính bị khoá ppt

Chiêu 40: Cho phép sử dụng tính năng Group and Outline trên bảng tính bị khoá

Để thực hiện điều này, trước tiên bạn hãy thiết lập Group and Outline cho dữ liệu của mình. Chọn vùng dữ
liệu rồi vào Data ➝ ➝ Group Outline và chọn Auto Outline (E2003: Data ➝ Group & Outline) kết quả như hình
sau:



Sau đó, bạn dùng tính năng Protect Sheet để khoá bảng tính lại: vào Review
➝ t
ại nhóm Changes
➝ ch
ọn
Protect Sheet và đặt vào mật mã bảo vệ. (Ví dụ như mật mã là Secret).

Khi bảng tính trong chế độ bảo vệ thì bạn không thể sử dụng được tính năng Group and Outline. Do vậy
chúng ta sẽ sử dụng tham số UserInterfaceOnly trong phương thức Protect kết hợp với sự kiện mở bảng
tính (Workbook_Open) để bật UserInterfaceOnly và EnableOutlining thành True.

Sau khi áp dụng Group and Outline xong, bạn nhấn ALT+F11 để vào cửa sổ VBE. Bạn chọn ThisWorkbook
và nhập vào đoạn mã sau (Tên Sheet1 là CodeName của Sheet Formulas Exercise, bạn cũng có thể thay
bằng Index của sheet trong bảng tính hoặc dùng TabName):

[highlight=VB]Private Sub Workbook_Open()
With Sheet1
.Protect Password:="Secret", UserInterfaceOnly:=True
.EnableOutlining = True
End With
End Sub[/highlight]

Sau đó nhấn Save và đóng cửa sổ VBE để trở về cửa sổ bảng tính, hãy lưu bảng tính và đóng lại. Sau đó,

bạn mở lại tập tin và cho phép Macro thực thị (nếu nhận được hộp thoại cảnh báo), khi đó bạn có thể sử
dụng được các nút Group and Outline trong bảng tính đang bị khoá (các nút lệnh đã bị mờ).



Ghi chú thêm:

Tham số UserInterfaceOnly của phương thức Protect
 là True: sẽ bảo vệ giao diện người dùng (user interface) nhưng cho phép dùng
macro để thay đổi.
 nếu không khai báo thì nhận giá trị mặc định là False: bảo vệ cả giao diện người
dùng và ngăn các lệnh macro can thiệp vào giao diện người dùng.
 EnableOutlining = True ➝ bật các nút Show/ Hide Detail