Cos lệnh khóa nhiều sheet trong excel bằng vba
Khi sử dụng chức năng Protect Sheet trong Excel, chúng ta chỉ có thể khóa từng trang tính một. Như vậy với những bảng tính có nhiều trang tính (workbook có nhiều sheet) thì việc này khá bất tiện. Để khắc phục vấn đề này, chúng ta có thể ứng dụng VBA để có thể thực hiện khóa tất cả các sheet cùng lúc chỉ với 1 thao tác. Cách thực hiện như sau: Bước 1: Mở cửa sổ VBA (phím tắt Alt + F11) và tạo 1 Module mới Bước 2: Trong Module này chúng ta tạo 1 sub, lấy tên là Khoa_TatCa_Sheet Sub Khoa_TatCa_Sheet … End Sub Bước 3: Viết code trong sub này như sau:
Việc khóa tất cả các sheet trong Workbook => Cần tạo 1 vòng lặp để chạy trên tất cả các sheet trong workbook Cần có 1 bảng thông báo để nhập mật khẩu khóa các sheet Như vậy chúng ta cần có 2 biến:
Câu lệnh hoàn chỉnh như sau:
Để mở khóa tất cả các sheet cùng lúc, chúng ta làm tương tự như vậy, chỉ thay câu lệnh Ten_Sheet.Protect thành Ten_Sheet.Unprotect:
Khi hoàn thành 2 Sub này chúng ta có thể vẽ ra các nút lệnh (Insert>Sharp) và gán Macro vào nút lệnh đó (Assign Macro) Những điểm cần lưu ý:
VBA có rất nhiều ứng dụng mà không thao tác được trên Excel thông thường hoặc phải mất rất nhiều thời gian để thao tác. Tuy nhiên, bạn hoàn toàn có thể làm chủ được VBA để phục vụ cho công việc của mình, giúp làm tăng tốc độ xử lý dữ liệu, từ đó giải quyết được khối lượng dữ liệu lớn chỉ trong thời gian ngắn. Để có thể học VBA một cách đầy đủ, có hệ thống, bạn hãy tham gia khoá học VBA101 – VBA cơ bản dành cho người mới bắt đầu của hệ thống Học Excel Online. Hiện nay hệ thống đang có nhiều ưu đãi khi bạn đăng ký khóa học này. Chi tiết xem tại: Tác giả: duongquan211287· · · |