Giúp sửa Form ẩn sheet và hiện sheet

[Thanh Bình PV]

Em có tìm trên mạng và tạo được 1 form để ẩn và hiện sheet. E muốn vừa hiện form vừa có thể sử dụng bảng tính nhưng khi e ẩn sheet thì e phải close lại mới ẩn được tương tự như hiện sheet. Lệnh hide all và unhide all thì thỏa mãn điều kiện đó nhưng lại không cập nhật lên listbox. Em cảm ơn.

 

[huuthang_bd]

Em có tìm trên mạng và tạo được 1 form để ẩn và hiện sheet. E muốn vừa hiện form vừa có thể sử dụng bảng tính nhưng khi e ẩn sheet thì e phải close lại mới ẩn được tương tự như hiện sheet. Lệnh hide all và unhide all thì thỏa mãn điều kiện đó nhưng lại không cập nhật lên listbox. Em cảm ơn.

Bạn thử file này

 

[Thanh Bình PV]

Bạn thử file này

E cảm ơn ạ. Mà a có thể chỉnh giúp e để có thể cuộn xuống bằng lăn chuột được không ạ. Em có tầm 100 sheet mà lại k lăn chuột được.

 

[vc_đi chơi]

Bạn thử file này

Chào anh huuthang_bd, em có có chuyển code anh giúp ở bài #2 thành add-in để sử dụng nhưng khi chọn để "Ẩn tất cả" thì báo lỗi.
Nếu không chuyển thành add in mà coppy trực tiếp code vào file để sử dụng thì không báo lỗi.
Mong sự giúp đỡ và khắc phục lỗi của anh và các anh/chị trên GPE.
Em xin cảm ơn!

 

[QuangMinhtb]

Chào anh huuthang_bd, em có có chuyển code anh giúp ở bài #2 thành add-in để sử dụng nhưng khi chọn để "Ẩn tất cả" thì báo lỗi.
Nếu không chuyển thành add in mà coppy trực tiếp code vào file để sử dụng thì không báo lỗi.
Mong sự giúp đỡ và khắc phục lỗi của anh và các anh/chị trên GPE.
Em xin cảm ơn!

View attachment 229768View attachment 229769

Của mình không lỗi

Bài đã được tự động gộp: 11/12/19

Của mình không lỗi

À vẫn lối nếu sử dụng adin bạn đính kèm.

 

[chothadiem]

Chào anh huuthang_bd, em có có chuyển code anh giúp ở bài #2 thành add-in để sử dụng nhưng khi chọn để "Ẩn tất cả" thì báo lỗi.
Nếu không chuyển thành add in mà coppy trực tiếp code vào file để sử dụng thì không báo lỗi.
Mong sự giúp đỡ và khắc phục lỗi của anh và các anh/chị trên GPE.
Em xin cảm ơn!

View attachment 229768View attachment 229769

Mình chuyển về đuôi .xla vẫn báo lỗi

 

[Thanh Bình PV]

Bác nào có thể giải thích giúp e được không ạ.. Đôi khi để code trong module thì không bị lỗi mà chuyển vô userform lại có tình trạng không chạy or báo lỗi.

 

[xuantocdotb]

Chào anh huuthang_bd, em có có chuyển code anh giúp ở bài #2 thành add-in để sử dụng nhưng khi chọn để "Ẩn tất cả" thì báo lỗi.
Nếu không chuyển thành add in mà coppy trực tiếp code vào file để sử dụng thì không báo lỗi.
Mong sự giúp đỡ và khắc phục lỗi của anh và các anh/chị trên GPE.
Em xin cảm ơn!

View attachment 229768View attachment 229769

Anh dùng office 64 hay 32b

 

[giaiphap]

Gợi ý thế này. Chổ nào ThisWorkbook thì sửa thành ActiveWorkbook thử xem sao.