PDA

View Full Version : Tạo một nút thoát workbook trong form



doanduy
14-04-12, 03:49 PM
Mình có một ý tưởng thế này nhưng mình chưa thực hiện được mong các bạn giúp cho
mình muốn tạo một file excel mà khi mở file mình đã gọi được form xuất hiện luôn rồi. Nhưng giờ mình muốn bảo mật thông tin mình muốn tạo một nút thoát trên form mà khi kích vào đó thì nó sẽ làm cho workbook đóng lại luôn như khi tắt file excel thông thường vậy. mình có tìm vài cách nó vẫn thoát được nhưng trong quá trình thoát vẫn báo lỗi lúc được lúc không. mong các bạn giúp cho đoạn code này.thanks nhiều

tvxdgt
14-04-12, 03:58 PM
Mình có một ý tưởng thế này nhưng mình chưa thực hiện được mong các bạn giúp cho
mình muốn tạo một file excel mà khi mở file mình đã gọi được form xuất hiện luôn rồi. Nhưng giờ mình muốn bảo mật thông tin mình muốn tạo một nút thoát trên form mà khi kích vào đó thì nó sẽ làm cho workbook đóng lại luôn như khi tắt file excel thông thường vậy. mình có tìm vài cách nó vẫn thoát được nhưng trong quá trình thoát vẫn báo lỗi lúc được lúc không. mong các bạn giúp cho đoạn code này.thanks nhiều
Bạn có thể tham khảo của

nghiaphuc (http://www.giaiphapexcel.com/forum/member.php?223970-nghiaphuc)

Mình đã thử xử lý bằng cách chuyển toàn bộ đoạn code trong Sub Workbook_BeforeClose gán cho nút Close Thisworkbook và sử dụng thêm các hàm MsgboxUni và VNItoUnicode của bác TuanVNUNI để Việt hóa, mình thấy khá ổn. Các bạn xem và góp ý nhé.
code-cho-sub-Workbook_BeforeClose (http://www.giaiphapexcel.com/forum/showthread.php?33548-Nhờ-sửa-code-cho-sub-Workbook_BeforeClose&p=226754#post226754)

thang314
16-04-12, 05:21 PM
mở file chạy luôn form: dùng trong sự kiện Workbook_open
Application.ScreenUpdating = False
userform.show
đóng file, đóng luôn form:
tạo button trên form:
thisworkbook.close
tạm thời thế có lẽ được rồi