Dùng VBA không cho xóa hoặc sửa các "names" trong hộp thoại "Name Manager" trong file (1 người xem)

[minhcong.tckt]

Em có 1 file excel, trong file đó em có 1 số các "names" quan trọng trong hộp "name Manager" để linK công thức và em muốn các name đó được bảo vệ, tránh trường hợp người dùng khác vào thay đổi các names đó.
Khi cần em muốn sửa lại các name đó thì như thế nào???

Mong các anh chị trong diễn đàn giúp đỡ
Chân thành cảm ơn!!!

 

[ndu96081631]

Em có 1 file excel, trong file đó em có 1 số các "names" quan trọng trong hộp "name Manager" để linK công thức và em muốn các name đó được bảo vệ, tránh trường hợp người dùng khác vào thay đổi các names đó.
Khi cần em muốn sửa lại các name đó thì như thế nào???

Mong các anh chị trong diễn đàn giúp đỡ
Chân thành cảm ơn!!!

Vậy bạn ẩn nó đi là được rồi
Câu lệnh:
Thisworkbook.Names("Tên của name").Visible =False
Ngoài ra, bạn cũng có thể Protect sheet để bảo vệ nameNói chung cũng chỉ là tương đối thôi

 

[Hong.Van]

Vậy bạn ẩn nó đi là được rồi
Câu lệnh:
Thisworkbook.Names("Tên của name").Visible =False
Ngoài ra, bạn cũng có thể Protect sheet để bảo vệ nameNói chung cũng chỉ là tương đối thôi

Nếu muốn ẩn một lúc TẤT CẢ CÁC Name thì có câu lệnh nào cho gọn không thầy?
em cảm ơn!

 

[dhn46]

Nếu muốn ẩn một lúc TẤT CẢ CÁC Name thì có câu lệnh nào cho gọn không thầy?
em cảm ơn!

Bạn dùng cái này

Sub AnName()


Dim Na As Name
For Each Na In ThisWorkbook.Names
    Na.Visible = False
Next


End Sub