khóa tiêu đề không cho xóa, sửa

Liên hệ QC

nvtnet

Thành viên thường trực
Tham gia
31/5/11
Bài viết
269
Được thích
15
các bác cho em hỏi ạ
em có 1 bảng dữ liệu, em muốn khóa cái tiêu đề của bảng, không muốn người khác xóa, sửa cái tiêu đề đó
nếu muốn xóa hoặc sửa tiêu đề phải có 1 thao tác bắt buộc nào đó như là nhập mật khẩu.
em có biết hàm input nhưng không biết viết thế nào để khóa được cái tiêu đề
 
Phải kiểu như này ko bạn
chính xác luôn ạ, cảm ơn bác ạ
Bài đã được tự động gộp:

Rộng hay hẹp là do chúng ta chọn Locked trong Format Cells ...
Vùng nào Locked thì không cho người dùng sửa chữa, ngược lại thì là cho phép
bản thân cái sheet là em phải lock rồi, nếu muốn lock thêm một vùng nào đó trên cùng sheet thì em không biết ạ. vì khi mở là nó sẽ mở cả sheet luôn
 
Upvote 0
bạn chọn all cell rồi vào format cells > protection > bỏ tick locked đi nhé
xong bạn muốn khóa vùng nào thì chọn vùng đó > format cells chọn locked
tiếp theo là khóa sheet nó sẽ khóa vùng bạn chọn thôi chứ ko khóa toàn bộ sheet, nhưng cách này những ô không khóa sẽ bị giới hạn chức năng
 
Upvote 0
bạn chọn all cell rồi vào format cells > protection > bỏ tick locked đi nhé
xong bạn muốn khóa vùng nào thì chọn vùng đó > format cells chọn locked
tiếp theo là khóa sheet nó sẽ khóa vùng bạn chọn thôi chứ ko khóa toàn bộ sheet, nhưng cách này những ô không khóa sẽ bị giới hạn chức năng
cái file test bác gửi là đúng ý em luôn. em không muốn khóa sheet, vì người làm đôi khi muốn chỉnh cái này cái kia không làm đc. Còn khóa tiêu đề bằng mật khẩu như vậy là chắc nhất, họ cần họ nhập mk vào, sửa xong thoát ra ô khác là xong, muốn sửa phải nhập tiếp. tránh bị làm nhầm
 
Upvote 0
các bác cho em hỏi ạ
em có 1 bảng dữ liệu, em muốn khóa cái tiêu đề của bảng, không muốn người khác xóa, sửa cái tiêu đề đó
nếu muốn xóa hoặc sửa tiêu đề phải có 1 thao tác bắt buộc nào đó như là nhập mật khẩu.
em có biết hàm input nhưng không biết viết thế nào để khóa được cái tiêu đề
Protect Sheet thì tác động hơi rộng nên em không muốn dùng ạ
Dùng VBA để Protect cái dòng tiêu đề đó
 
Upvote 0
Dùng VBA để Protect cái dòng tiêu đề đó
Cách này rộng hơn nhưng viết code cực lắm.
Kiểu không cho vào vùng như bài #5 thớt chấp nhận rồi là xong.
Cái cực chuyển từ người viết code sang người dùng.
Người dùng mỗi lần đưa con trỏ nhằm cái vùng ấy thì lại phải nhập mật khẩu. Ví dụ dùng Ctrl+Up Arrow để về vị trí đầu bảng.
 
Upvote 0
1. Dùng Worksheet_Change
2. Vùng cấm vd. là D3:K5
3. Mật khẩu vd. là "12345"
Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim password As String
    If Not Intersect(Me.Range("D3:K5"), Target) Is Nothing Then
        password = InputBox("Nhap mat khau de chinh sua", "Nhap mat khau")
        If password <> "12345" Then
            MsgBox "Ban da nhap sai mat khau", vbCritical, "Loi"
            With Application
                .EnableEvents = False
                .Undo
                .EnableEvents = True
            End With
        End If
    End If
End Sub
 
Upvote 0
1. Dùng Worksheet_Change
2. Vùng cấm vd. là D3:K5
3. Mật khẩu vd. là "12345"
Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim password As String
    If Not Intersect(Me.Range("D3:K5"), Target) Is Nothing Then
        password = InputBox("Nhap mat khau de chinh sua", "Nhap mat khau")
        If password <> "12345" Then
            MsgBox "Ban da nhap sai mat khau", vbCritical, "Loi"
            With Application
                .EnableEvents = False
                .Undo
                .EnableEvents = True
            End With
        End If
    End If
End Sub
Dạ cảm ơn bác nhiều ạ
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom