Có phải yêu cầu 11 code như vậy không thầy ơi.
Sub Yeucau11()
'
' Yeucau11 Macro
'
'
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
Sub Yeucau11mo()
'
' Yeucau11mo Macro
'
'
ActiveSheet.Unprotect
End Sub
Chào bạn phần khoá và mở khoá vậy là đúng rồi, bạn có thể thêm mật khẩu nữa nhé, phần khoá chỉ cần như sau
sub khoa
ActiveSheet.Protect "gitiho"
end sub
phần mở
sub mo
ActiveSheet.Unprotect "gitiho"
end sub
v của thầy ngắn hơn quá, vậy cả 2 cách điều dc hả thầy
chào bạn của mình thêm cái pass nữa thôi còn bản chất như nhau
nhung mà khi e khóa hay mở thì cũng điều không hiện mat khẩu à thầy, những vẫn tự động khóa và mở sheet bình thường
chào bạn nếu bạn không thêm pass nghĩa là bạn khoá bằng chế đọ bình thường chỉ cần mở khoá là xong không cần code hay pass
Mà sao e nhập đoạn code của thầy thì khóa hay mở thì nó cũng giống của e. không hiện mật khẩu cho mình nhập thầy ơi
Chào bạn với trường hợp đầu của bạn người dùng vào review>unprotect không cần nhập mật khẩu cũng nhập được dữ liệu, còn với cách có mật khẩu bạn bắt buộc phải có mk mới có thể nhập được, với trường hợp bằng code là trong đó bạn có gán khoá mở rồi
Cảm ơn thầy nha
Chúc bạn học tốt cùng gitiho