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. | 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 ị 3 1 Il i 1 - z A 8 c . p . Ẹ F G H 1 Item Normal Price per Block 20 1 Discount Total Price Normal Price per Block 2007 Discount Total . 24 ŨỮ Grant Total 49 ỌC 2 ToohtyS New 530 0Ọ 55 00 525 ro 529 00 S5ỌỌ Emu Expert 528 00 . w 00 24 co 530 CO 54 GO 526 ÜC 60 00 4 Crown Lager S3 60 532 50 538 ÕÕ S3 50 534 60 5 Swan Laqer 27 0Ö 54 GO 523 CO 523 50 54 00 47 50 5 Matilda Bay Draught S3 00 532 0Ũ 53 ỮŨ 29 00 57 50 7 Hemekin Lager 35 00 S2SÖ1 532 a 36 00 S2 30 33 20 6540 5 Swan Gold 526 00 S3 Đ0 523 ŨC 529 w S3 00 26 00 49 q 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ố .
