Xin cách Khóa chức năng thoát file Excel (1 người xem)

[toantinhte87]

Mình đang viết môt tiện ích cho công ty còn một số vướng mắc nhỏ mong mọi người giúp đơ!
1. Mình cần viết code cho một nút lệnh đế khóa không cho người khác thoát file EX của mình Bằng nút X và tạo một nút đóng file khác (cài này mình đã từng tìm ra trên diễn đàn nhưng giờ cần tìm ko ra)
2. Ẩn hết những ô ngoài vùng làm việc (Ví dụ: Từ hàng số 30 trở xuống dưới mất hết)
3. Ẩn thanh tên Sheet

 

[leonguyenz]

Mình đang viết môt tiện ích cho công ty còn một số vướng mắc nhỏ mong mọi người giúp đơ!
1. Mình cần viết code cho một nút lệnh đế khóa không cho người khác thoát file EX của mình Bằng nút X và tạo một nút đóng file khác (cài này mình đã từng tìm ra trên diễn đàn nhưng giờ cần tìm ko ra)
2. Ẩn hết những ô ngoài vùng làm việc (Ví dụ: Từ hàng số 30 trở xuống dưới mất hết)
3. Ẩn thanh tên Sheet

1. Đóng Workbook bằng nút thì làm tham khảo bài #2 (code của Thầy ndu96081631): Đóng Application và workbook bằng button mới

2. & 3. Thêm code Open workbook:
[gpecode=vb]
Private Sub Workbook_Open()
Dim Ws As Worksheet
For Each Ws In Worksheets
If Ws.Name <> "Sheet1" Then Ws.Visible = xlSheetHidden
Next
With Sheet1
.Range([A30], [A30].End(xlDown)).EntireRow.Hidden = True
End With
End Sub
[/gpecode]

 

[phucbugis]

hehe,
nếu bạn chưa rành về cách dùng Boolean ​của bác LeoNguyenZ thì thử file sau "tự chế" của mình xem.

Link: https://www.mediafire.com/?l46ivw34295m0g9

 

[toantinhte87]

Mình muốn khóa hết các thanh công cụ của excel để người khác khỏi chỉnh sửa gì được tiện ích của mình có cách nào không ạ.

 

[toantinhte87]

hehe,
nếu bạn chưa rành về cách dùng Boolean ​của bác LeoNguyenZ thì thử file sau "tự chế" của mình xem.

Cách cuản bạn đúng ý mình rồi. Bán giúp mình ẩn luôn các thanh công cụ của excel đc ko ạ.
Mình ko muốn họ định dạng lại trang tính của mình

 

[chuot0106]

Mình muốn khóa hết các thanh công cụ của excel để người khác khỏi chỉnh sửa gì được tiện ích của mình có cách nào không ạ.

Bạn dùng chức năng Protection của Excel thôi.

 

[Ngoai Thanh]

Cách cuản bạn đúng ý mình rồi. Bán giúp mình ẩn luôn các thanh công cụ của excel đc ko ạ.
Mình ko muốn họ định dạng lại trang tính của mình

Theo mình thì bạn nên chịu khó học hỏi nâng cao kiến thức để phục vụ công việc cho mình, bao giờ giỏi như các thày thì bày ra trước mắt họ còn chả hiểu, chứ nói gì đến ăn cắp ý tưởng hay sửa chữa ...linh tinh gì đó . Vài lời chia sẻ cùng bạn !

 

[toantinhte87]

Theo mình thì bạn nên chịu khó học hỏi nâng cao kiến thức để phục vụ công việc cho mình, bao giờ giỏi như các thày thì bày ra trước mắt họ còn chả hiểu, chứ nói gì đến ăn cắp ý tưởng hay sửa chữa ...linh tinh gì đó . Vài lời chia sẻ cùng bạn !

Có thể bạn giỏi hơn mình. Nhưng đây là diễn đàn chi sẻ học hỏi. Mình cài gì không biết minhd hỏi. "Mình không muốn họ định dạng lại trang tính" đâu phải sợ ăn cắp ý tưởng. bạn nói vậy hơi khó nghe. Việc mình muốn khóa để khỏi bị người dùng ko biết lại xóa bớt đi mấy nút lệnh thì làm sao dung đc nữa. Bạn không có chỉ dẫn thì thôi không nên có những bài viết theo kiểu như thế này. Một góp ý nhỏ cho bạn

 

[toantinhte87]

Theo mình thì bạn nên chịu khó học hỏi nâng cao kiến thức để phục vụ công việc cho mình, bao giờ giỏi như các thày thì bày ra trước mắt họ còn chả hiểu, chứ nói gì đến ăn cắp ý tưởng hay sửa chữa ...linh tinh gì đó . Vài lời chia sẻ cùng bạn !

Nói thế này cho bạn hiểu nhé:
Bạn rất giỏi bạn bạn viết một tiện ích excel tuyệt vời nhất thế giới. Bán không sợ bị ăn cắp ý tưởng và bạn cũng không khóa lại.
Mình là người dùng tiện ích của bạn mình là người không biết gì. Và mình xóa dữ liệu những ô chứa công thức hoặc xóa đi nút bắt đầu trong chương trình của bạn.
Theo bạn lần sau vào lại tiện ít của bạn mình con dùng được nữa ko?

 

[Let'GâuGâu]

Mình đang viết môt tiện ích cho công ty còn một số vướng mắc nhỏ mong mọi người giúp đơ!
1. Mình cần viết code cho một nút lệnh đế khóa không cho người khác thoát file EX của mình Bằng nút X và tạo một nút đóng file khác (cài này mình đã từng tìm ra trên diễn đàn nhưng giờ cần tìm ko ra)
2. Ẩn hết những ô ngoài vùng làm việc (Ví dụ: Từ hàng số 30 trở xuống dưới mất hết)
3. Ẩn thanh tên Sheet

Tôi cũng nhu cầu tương tự như bạn khi viết một ứng dụng nhỏ cho nhân viên thao tác, nhân viên của tôi chỉ là những công nhân bình thường, họ ko biết gì nhiều về office hay máy tính. vì vậy mình ko thể lường trước là họ sẻ làm cái gi trong lúc sử dụng cái ứng dụng đó.
vì vậy việc khóa (dạng như protect sheet) cũng là một yêu cầu chính đáng (mục đính là để giảm sai sót thao tác).
=================
về yều cầu của bạn (tắt cái nút "x" đi), tôi cũng tìm rất nhiều nhưng hình như ko thể làm được.
=====> nhưng ko làm được các này thì ta tìm cách khác
1- khóa những vùng ko cần thao tác
2- dùng sự kiện "before save" để kiểm soát khi nào thì được phép save
3- dùng sự kiện "before close" khi close thì chỉ có False thôi,

làm như vậy bảng tính của bạn có thể trở với cái "vô tình"

một vài góp ý nhỏ, chúc bạn thành công

 

[toantinhte87]

Tôi cũng nhu cầu tương tự như bạn khi viết một ứng dụng nhỏ cho nhân viên thao tác, nhân viên của tôi chỉ là những công nhân bình thường, họ ko biết gì nhiều về office hay máy tính. vì vậy mình ko thể lường trước là họ sẻ làm cái gi trong lúc sử dụng cái ứng dụng đó.
vì vậy việc khóa (dạng như protect sheet) cũng là một yêu cầu chính đáng (mục đính là để giảm sai sót thao tác).
=================
về yều cầu của bạn (tắt cái nút "x" đi), tôi cũng tìm rất nhiều nhưng hình như ko thể làm được.
=====> nhưng ko làm được các này thì ta tìm cách khác
1- khóa những vùng ko cần thao tác
2- dùng sự kiện "before save" để kiểm soát khi nào thì được phép save
3- dùng sự kiện "before close" khi close thì chỉ có False thôi,

làm như vậy bảng tính của bạn có thể trở với cái "vô tình"

một vài góp ý nhỏ, chúc bạn thành công

TK bạn. Mình đã hoàn thiện cái tiện ích nho nhỏ để test nhân viên hàng tháng. Nhân viên mình cũng ko rành lắm các thao tác nên minh phải thêm chức năng khóa "x" để họ khỏi thoát đột ngột mà không lưu lại bài làm. Cảm ơn về cái "Before save" của bạn. Chúc bạn gặp nhiều may mắn!

 

[Ngoai Thanh]

Nói thế này cho bạn hiểu nhé:
Bạn rất giỏi bạn bạn viết một tiện ích excel tuyệt vời nhất thế giới. Bán không sợ bị ăn cắp ý tưởng và bạn cũng không khóa lại.
Mình là người dùng tiện ích của bạn mình là người không biết gì. Và mình xóa dữ liệu những ô chứa công thức hoặc xóa đi nút bắt đầu trong chương trình của bạn.
Theo bạn lần sau vào lại tiện ít của bạn mình con dùng được nữa ko?

Có đến 4 người giúp bạn trong đó thày NDU là chuyên gia, kể cả phương án có nút điều khiển đến không có ( phương án của thày NDU ) . Nếu vô tình thì không thể xóa được, trừ khi cố tình tìm cách xóa . Bạn tự ái thì thôi , mình không tranh luận .