Xóa dòng khi protect sheet

Liên hệ QC

phuchuy9999

Thành viên mới
Tham gia
5/11/17
Bài viết
38
Được thích
5
Giới tính
Nam
Chào các anh chị cao thủ, vui lòng xem giúp e, trong bảng protected sheet e đã chọn mục được xóa dòng (delete row) nhưng không hiểu sao khi người dùng sử dụng vẫn không thể xóa được có phải là do các ô trong dòng đó đều đang được định dạng lock nên không xóa được, e dã mò 2 ngày vẫn ko ra cách để ng sử dụng có thể xóa được.. Nếu a chị nào hiểu rõ vấn đề này vui lòng giúp đỡ e, chân thành cảm ơn
1532506796208.png1532506833838.png
 
Lần chỉnh sửa cuối:
Chào các anh chị cao thủ, vui lòng xem giúp e, trong bảng protected sheet e đã chọn mục được xóa dòng (delete row) nhưng không hiểu sao khi người dùng sử dụng vẫn không thể xóa được có phải là do các ô trong dòng đó đều đang được định dạng lock nên không xóa được, e dã mò 2 ngày vẫn ko ra cách để ng sử dụng có thể xóa được
View attachment 200396View attachment 200397
Bạn đưa file của bạn lên để mình coi, chứ bình thường là phải được chứ nhỉ?
 
Tức là toàn bộ các ô trong bảng tính phải unlock hả anh chị
 
không phải toàn bộ các ô. mà là cho phép del row nghĩa là bạn phải bỏ lock cho nguyên dòng nào bạn cho phép del.
ah e hiểu r, chỉ là có những ô bắt buộc phải lock để ng dùng ko thể sửa đổi dữ liệu. CẢm ơn anh chị, còn cách nào khác ko
Bài đã được tự động gộp:

Rất tiếc với bạn là không thể xóa dòng nếu cells dòng đó locked. Chỉ còn cách viết code VBA
nếu viết code thì có thề viết như thế nào, anh chị nếu tiện thì viết giúp e ra đây, để e về cty paste vào file gốc
 
ah e hiểu r, chỉ là có những ô bắt buộc phải lock để ng dùng ko thể sửa đổi dữ liệu. CẢm ơn anh chị, còn cách nào khác ko
Bài đã được tự động gộp:


nếu viết code thì có thề viết như thế nào, anh chị nếu tiện thì viết giúp e ra đây, để e về cty paste vào file gốc
code đại khái như thế này:
Mã:
Sub xoadong()

    Dim row As Long

    row = InputBox("nhap dong can xoa")

    If Val(row) > 0 Then

        ActiveSheet.Unprotect "mat khau"

        Rows(Val(row) & ":" & Val(row)).Delete

        ActiveSheet.Protect "mat khau"

    End If

End Sub
 
ah e hiểu r, chỉ là có những ô bắt buộc phải lock để ng dùng ko thể sửa đổi dữ liệu. CẢm ơn anh chị, còn cách nào khác ko
Bài đã được tự động gộp:


nếu viết code thì có thề viết như thế nào, anh chị nếu tiện thì viết giúp e ra đây, để e về cty paste vào file gốc
Nguồn: internet
 

File đính kèm

  • Copy of UNPROTECT SHEET-1.xls
    43.5 KB · Đọc: 10
Web KT
Back
Top Bottom