Hỏi về cách làm Hộp Thoại Username & Password ?

[donghoangedu]

Help Me

Giúp Tui Làm Hộp Thoại Username & Password Giống Như Hình Dưới ... Trước Khi Vào Các Sheet Của Excel ...

 

[ltmcustoms]

Nguyên văn bởi: Mr Okebab

vbmenu_register("postmenu_26004", true);
http://www.giaiphapexcel.com/forum/member.php?u=440 tmenu_26004", true); ...đẹp hơn (theo ý người tạo ra nó), đa dụng hơn (cũng là mở nhưng là mở thế nào, được quyền làm những gì, theo dõi người đăng nhập theo User . . . - Mutil User). Khó dùng, khó làm và khó phá.
Chào bác Mr Okebab! Cho em hỏi chút về phần " ...theo dõi người đăng nhập theo User . . . - Mutil User)" thì làm như thế nào!? Cụ thể em đang rất cần: khi 1 User đăng nhập thành công thì ghi User đó vào 1 ô [chẳng hạn Sheet("Sheet1").Range("E1") ] và mở rộng cho nhiều Users cho 1 file thì tốt quá! Bác làm cho em 1 file nhé!?
Cám ơn bác!
LTMCustoms

 

[ontopoftheworld]

Bác hỏi đúng người(Mr. Hiếu) rồi đó.

Ngoài ra,Bác tham khảo chương trình quản lý kho của Anh Duyệt. Trong File đó Anh Duyệt có cái form đăng nhập Admin và Client, bác có thể tham khảo.Và mượn một đoạn code sau(đã có trên diễn đàn, thật sự không nhớ rõ tác giả là ai)

Range("A65536").End(xlUp)(2, 1) = Me.CmbUserName
Range("A65536").End(xlUp)(1, 2) = Now()
Range("A65536").End(xlUp)(1, 3) = Me.TxtPassword ' nếu muốn biết pass của người đăng nhập vào file

em chỉ có thể gởi cái ý của các nhân em thôi; còn file bác tham khảo xem cái cải tiến thêm không?
NGoài ra bác tham khảo cái form của anh Duyệt ở đây: http://www.giaiphapexcel.com/forum/showthread.php?t=1155

 

[Mr Okebab]

Nguyên văn bởi: Mr Okebab

vbmenu_register("postmenu_26004", true);
tmenu_26004", true); ...đẹp hơn (theo ý người tạo ra nó), đa dụng hơn (cũng là mở nhưng là mở thế nào, được quyền làm những gì, theo dõi người đăng nhập theo User . . . - Mutil User). Khó dùng, khó làm và khó phá.
Chào bác Mr Okebab! Cho em hỏi chút về phần " ...theo dõi người đăng nhập theo User . . . - Mutil User)" thì làm như thế nào!? Cụ thể em đang rất cần: khi 1 User đăng nhập thành công thì ghi User đó vào 1 ô [chẳng hạn Sheet("Sheet1").Range("E1") ] và mở rộng cho nhiều Users cho 1 file thì tốt quá! Bác làm cho em 1 file nhé!?
Cám ơn bác!
LTMCustoms

Bạn tham khảo ở đây nhé :
http://www.giaiphapexcel.com/forum/showthread.php?t=2828

Đây là File VD

Thân!

 

[ontopoftheworld]

Mới quay qua quay lại mà anh HIếu đã trả lời rùi, lệ thiệt
Em phải tham khảo cách anh làm mới được. Cám ơn Anh

 

[tedaynui]

Mới quay qua quay lại mà anh HIếu đã trả lời rùi, lệ thiệt
Em phải tham khảo cách anh làm mới được. Cám ơn Anh

Hix, mấy vụ này mình bị hoài. Mình Type vô cùng chậm. Nhiều khi cong lưng , "mổ" muốn gãy tay luôn, click <Gởi trả lời>. Hớn hở quá... ai dè đã có câu trả lời khác nằm chình ình ở trên... lại còn là câu trả lời có giải pháp hay hơn, thế mới chết mình chứ... ac ac ; coi như "công cóc"... hix hix

 

[Mr Okebab]

các bác trêu em làm em "sấu" hổ quá. Em chỉ copy Link thôi.

Có giải pháp gì thì cứ đưa ra, mỗi cái có cái hay riêng mà.

Thân!

 

[pikachudixelu2]

Bạn Mr Okebab

vbmenu_register("postmenu_25967", true);

ơi mình làm thử rồi nhưng nó vẫn hiện các sheet có chứa dữ liệu và khi xuất hiện form longin thì mình kích chuột vào biểu tượng dấu nhân đỏ mà vẫn vào được khôgn cần Disable Macro các bạn cho ý kiến nha. Thân!

 

[tedaynui]

Thế nên cần phải vô hiệu hóa nút Close Form (X) luôn.

 

[pikachudixelu2]

Híc Usename và pass của bạn không sài được bạn kiểm tra lại xem Mr Okebab

ơi vbmenu_register("postmenu_25967", true);
trong phần Login2.xls mà bạn đã tải lên không dùng được... thân

 

[pikachudixelu2]

Bạn Mr Okebab

vbmenu_register("postmenu_25967", true);

ơi bạn kiểm tra lại file Login2.xls mà bạn đã Up nó xem lại pas và Usename đi nhé mình vào ko được....Thân

 

[anhtotbung35]

Bác Tuấn cho em mạn phép giúp cái sai nguyên tắc này nhá. Em lỡ gởi rồi, thì Bác nói sai nguyên tắc làm em chột dạ wá.
to: Dong Hoang
Cậu nhớ lần sau gởi bài thì phải đặt tên Topic rõ ràng. Cậu muốn được giúp đỡ vấn đề gì thì ghi rõ nhá. Đừng có "heo mi"
Còn đây là cách làm củ khoai của tớ , Code đều tham khảo trên 4R này. Tớ chưa sử dụng bẫy lỗi để "try again" mỗi khi nhập sai User và Pass. Nên nó sẽ out mỗi khi cậu nhập sai User va Pass
Cái User:ken và Pass:833486

Trong bài viết số 3 của bạn onto, nếu có thêm nhưng cái này thì hay hơn:
- Mỗi lần nhập sai user hoặc pass thì cho nhập lại, nếu quá 3 lần thì thoát khỏi excell luôn.
- Có thể tạo thêm chức năng đổi user và pass