Cho em hỏi về cách khoá các hàm không cho người khác thay đổi ... (2 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

boykill9999

Thành viên mới
Tham gia
3/11/09
Bài viết
3
Được thích
0
Cho em hỏi về cách khoá các hàm không cho người khác thay đổi ...
 
Khoá ô

Bạn dùng tạm file kèm theo
 

File đính kèm

ban dùng hàm này cũng đc.đây là hàm do thành viên trong GPEX viết
'Tao o khoa tung cel trong khi su dung cong thuc,mà khong cho ng khac su dung
Private Sub workbook_sheetselectionchange(ByVal sh As Object, ByVal target As Range)
'password dat la "25251325"
Dim rngdata As Range
'bat dau vong lap for qua vong lap for co chua gia tri
For Each rngdata In target.Cells
'kiem tra xem o so co phai la cong thuc khong ?
If rngdata.HasFormula Then
'khoa o neu o do la cong thuc
ActiveSheet.Protect ("25251325")
Exit Sub
Else
'huy bo khoa o neu o do khong phai la cong thuc
ActiveSheet.Unprotect ("25251325")
End If
Next rngdata
End Sub
'Bạn copy đoạn code đó vào thisWorkbox nhé rùi trở lại ex
 
Mình cảm ơn nhưng đợt trước có cách khoá 1 phát tất cả các hàm trong sheet
 
Web KT

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

Back
Top Bottom