kellyfe
Thành viên chính thức


- Tham gia
- 25/5/07
- Bài viết
- 75
- Được thích
- 40
Trước hết, bạn chọn toàn bộ các ô trống trên cột A, nhấn Ctrl+1, chọn tab Protection và bỏ tùy chọn Locked --> OK.mình muồn khi nhập số vào ô a1 thì khi enter xuống dòng, ô a1 sẽ tự động khóa và không chỉnh sửa được, tương tự vậy cho các dòng trong cột a. và password để chỉnh là :"camonban". Bạn nào biết giúp mình nha. cám on các bạn.
Trước hết, bạn chọn toàn bộ các ô trống trên cột A, nhấn Ctrl+1, chọn tab Protection và bỏ tùy chọn Locked --> OK.
Tiếp theo, sử dụng code này cho Sheet1:
[GPECODE=vb]Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then Exit Sub
If Len(Target.Value) > 0 Then
ActiveSheet.Unprotect "camonban"
Target.Locked = True
ActiveSheet.Protect "camonban"
End If
End Sub[/GPECODE]
Mục đích của người hỏi là khi đã nhập vào thì miễn sửa lại mà. Muốn sửa lại thì bạn nhấn Alt+T+P+P, sẽ hiện ra hộp thoại để bạn nhập password Unprotect sheet.nếu muốn chỉnh sửa dữ liệu thì làm ntn hả bạn? làm thế nào để hiện ra pass mà nhập vào để chỉnh sửa dữ liệu được chứ
p/s: bạn dùng phần mềm gì để gõ lệnh mà đẹp thế, chỉ mình với)