Jim có một sổ làm việc được nhiều người trong công ty của anh ấy sử dụng. Anh ấy tự hỏi liệu có cách nào cho phép mọi người thêm dữ liệu vào một nhóm ô nhưng lại hạn chế người có thể xóa dữ liệu khỏi các ô đó hay không. Anh ấy có một nhóm khoảng 50 người mà anh ấy muốn có thể thêm dữ liệu, nhưng anh ấy muốn cung cấp khả năng xóa cho chỉ 2 người.

Bạn có thể thử bất kỳ giải pháp dựa trên vĩ mô nào. Về cơ bản, bạn cần một macro để phát hiện khi nào thông tin đã bị xóa và sau đó kiểm tra xem liệu người xóa thông tin có được phép làm như vậy hay không. Sau đây chỉ là một cách tiếp cận vấn đề khả thi:

Private Sub Worksheet_Change(ByVal Target As Range)

Dim sPassCheck As String     Dim rng As Range     Dim sTemp As String     Dim sPassword As String

sPassword = "Password"

sTemp = "You must enter the password to delete data"



'Use to set a single cell if more than one cell is     'in the target range     If Target.Count > 1 Then         Set rng = Target.Cells(1, 1)

Else         Set rng = Target     End If

If rng.Value = "" Then         sPassCheck = InputBox(sTemp, "Delete check!")

Application.EnableEvents = False         If sPassCheck <> sPassword Then Application.Undo     End If

Application.EnableEvents = True End Sub

Macro, thực sự là một trình xử lý sự kiện được kích hoạt bất cứ khi nào một thứ gì đó trong trang tính bị thay đổi, sẽ kiểm tra xem thông tin trong một ô (hoặc ô trên cùng bên trái trong một dải ô) có bị xóa hay không. Nếu vậy, người dùng được yêu cầu nhập mật khẩu. Nếu người đó không có mật khẩu, thì phương thức Hoàn tác được gọi để “hoàn tác” việc xóa của người đó. (Bạn sẽ muốn thay đổi mật khẩu được gán cho biến sPassword) thành mật khẩu thực mà bạn muốn mọi người sử dụng.)

Một tùy chọn khác là sử dụng một bổ trợ Excel có thể giải quyết các vấn đề bảo mật cho bạn. Một số người đăng ký đề xuất sử dụng A-Tools, phiên bản miễn phí hoặc chuyên nghiệp (trả phí). Bạn có thể tìm thêm thông tin về phần bổ trợ này tại đây:

http://www.atoolspro.com/

A-Tools, trong số những thứ khác, dường như cho phép bạn áp dụng các tính năng bảo mật khác nhau cho dữ liệu Excel nằm trên mạng. (Rất có thể Jim đang chia sẻ sổ làm việc của mình trên mạng, vì nó được nhiều người trong công ty của anh ấy sử dụng.)

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (11597) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003.

Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: