Bắt sự kiện khi di chuyển cửa sổ Excel

[Miccpro]

Kính chào các anh chị GPE
Em thấy trong Excel có sự kiện:

Private Sub Workbook_WindowResize(ByVal Wn As Window)

Sự kiện này bắt được khi ta phóng to, thu nhỏ, kéo thả kích thước nhưng không thực hiện được khi di chuyển cửa sổ Excel từ vị trí X sang vị trí Y . Vậy giờ em muốn bắt sự kiện này thì có được không ạ, Nếu được mong các anh chị hướng dẫn giúp.
Em xin chân thành cảm ơn

 

[befaint]

Sự kiện này bắt được khi ta phóng to, thu nhỏ, kéo thả kích thước nhưng không thực hiện được khi di chuyển cửa sổ Excel từ vị trí X sang vị trí Y .

Thì rõ ràng tên sub đó ghi luôn chức năng nhiệm vụ rồi mà.

Workbook_WindowResize

muốn bắt sự kiện này thì có được không

Mình nói luôn cái mong muốn cuối cùng đi. Chứ chưa chắc cần biết sự kiện đó làm gì.

 

[Miccpro]

Thì rõ ràng tên sub đó ghi luôn chức năng nhiệm vụ rồi mà.

Workbook_WindowResize


Mình nói luôn cái mong muốn cuối cùng đi. Chứ chưa chắc cần biết sự kiện đó làm gì.

Ý em muốn là khi di chuyển cửa sổ Excel từ vị trí X sang Y (Giữ chuột trái trên thanh Panel và di chuyển cửa sổ) thì sự kiện trên không bắt được ạ

 

[befaint]

sự kiện trên không bắt được

Thì đã nói ở trên rồi mà, rất hiểu chỗ đó rồi mà.

Đang hỏi là mục đích cuối cùng làm gì á. Tức là giả sử bắt được cái kia đi, rồi sau đó cuối cùng mình làm gì á?

 

[Miccpro]

Thì đã nói ở trên rồi mà, rất hiểu chỗ đó rồi mà.

Đang hỏi là mục đích cuối cùng làm gì á. Tức là giả sử bắt được cái kia đi, rồi sau đó cuối cùng mình làm gì á?

Mục đích của em là bắt sự kiện này để tính toán khi di chuyển file Excel thì Form (chế độ ShowModal = False) thuộc file đó cũng di chuyển theo anh ạ

 

[befaint]

Mục đích của em là bắt sự kiện này để tính toán khi di chuyển file Excel thì Form (chế độ ShowModal = False) thuộc file đó cũng di chuyển theo anh ạ

Mới là mục đích thứ gần cuối cùng thôi.

 

[HeSanbi]

Mục đích của em là bắt sự kiện này để tính toán khi di chuyển file Excel thì Form (chế độ ShowModal = False) thuộc file đó cũng di chuyển theo anh ạ

Dùng winapi SetParent
Bạn tham khảo bài viết có mục đích như vậy

LocalizeXL v1.71 - Làm nổi bật ô đang chọn và cuộn trang tự động

***** CẬP NHẬT v1.71 MỚI NHẤT 14/07/2023***** Nhấn để tải về LocalizeXL v1.71 (***Cần đăng nhập để tải, Add-in mật khẩu mã VBA là 1) (Tệp Add-in chỉ nhẹ 174 kb. Tệp zip bao gồm hướng dẫn và hình ảnh.) -------------------------------------------------------------------------------------- Chia sẻ...

giaiphapexcel.com

Bài đã được tự động gộp: 24/4/21

Bài thứ hai để tham khảo code:

DatePickerXL - Add-in Lịch để chọn ngày cho bảng tính (phiên bản lỗi)

Hôm nay tôi chia sẻ với các bạn Add-in chọn ngày với chức năng linh hoạt, giao diện đẹp mắt và đa dạng màu. Để các bạn nào có đam mê, thì có thể phát triển thêm. Nhưng add-in này tôi chưa thể hoàn thiện nó. Để Icon lịch hiện lên có 2 cách: 1. Gõ vào ô \c hoặc \d hoặc \dp 2. Nếu giá trị trong...

giaiphapexcel.com

 

[Miccpro]

Mới là mục đích thứ gần cuối cùng thôi.

Dùng winapi SetParent
Bạn tham khảo bài viết có mục đích như vậy

LocalizeXL v1.71 - Làm nổi bật ô đang chọn và cuộn trang tự động

***** CẬP NHẬT v1.71 MỚI NHẤT 14/07/2023***** Nhấn để tải về LocalizeXL v1.71 (***Cần đăng nhập để tải, Add-in mật khẩu mã VBA là 1) (Tệp Add-in chỉ nhẹ 174 kb. Tệp zip bao gồm hướng dẫn và hình ảnh.) -------------------------------------------------------------------------------------- Chia sẻ...

giaiphapexcel.com

Bài đã được tự động gộp: 24/4/21

Bài thứ hai để tham khảo code:

DatePickerXL - Add-in Lịch để chọn ngày cho bảng tính (phiên bản lỗi)

Hôm nay tôi chia sẻ với các bạn Add-in chọn ngày với chức năng linh hoạt, giao diện đẹp mắt và đa dạng màu. Để các bạn nào có đam mê, thì có thể phát triển thêm. Nhưng add-in này tôi chưa thể hoàn thiện nó. Để Icon lịch hiện lên có 2 cách: 1. Gõ vào ô \c hoặc \d hoặc \dp 2. Nếu giá trị trong...

giaiphapexcel.com

Cảm ơn Bác, em sẽ tìm hiểu thêm. Code của Bác nó ở tầm quá hiểu của em nhiều nhiều

 

[Maika8008]

Mới là mục đích thứ gần cuối cùng thôi.

Cái mục đích cuối cùng chưa tiện tiết lộ

 

[HeSanbi]

Cảm ơn Bác, em sẽ tìm hiểu thêm. Code của Bác nó ở tầm quá hiểu của em nhiều nhiều

Tôi nói bác vận dụng api SetParent, còn ứng dụng có code để tham khảo, bác xem cách setParent trong code.

Đơn giản bác chỉ cần lấy handle của form với api FindWindow, handle của xlmain hoặc excel7 làm parent
Rồi:
setParent formHandle, xlmain/excel7

Vậy là xong, form tự động di chuyển theo. Parent đi đâu child đi theo đó.

 

[Miccpro]

Tôi nói bác vận dụng api SetParent, còn ứng dụng có code để tham khảo, bác xem cách setParent trong code.

Đơn giản bác chỉ cần lấy handle của form với api FindWindow, handle của xlmain hoặc excel7 làm parent
Rồi:
setParent formHandle, xlmain/excel7

Vậy là xong, form tự động di chuyển theo. Parent đi đâu child đi theo đó.

Thực sự em xem 2 bài của bác mà mò không ra được gì cả. Bác giúp em khi di chuyển WinDow thì Form cũng di chuyển vả luôn nằm giữa như trong file đính kèm được không ạ. Em xin cảm ơn

 

[HeSanbi]

Thực sự em xem 2 bài của bác mà mò không ra được gì cả. Bác giúp em khi di chuyển WinDow thì Form cũng di chuyển vả luôn nằm giữa như trong file đính kèm được không ạ. Em xin cảm ơn

Không biết đến khi nào tôi mới có thể ngồi vào máy tính.
Nên bác cố gắn tham khảo:

Userform vừa khít các loại màn hình và luôn nằm dưới thanh Menu Ribbon

Chào các anh chị!!! Em có bắt chước làm Menu Ribbon, em muốn khi mở file lên là hiện FormMain luôn vừa khít với mọi loại màn hình nhưng luôn nằm dưới thanh Menu Ribbon. Và khi chọn các nút thì cũng hiện form vừa khít các loại màn hình và nằm dưới thanh Menu Ribbon. Trong file là em tự làm thủ...

www.giaiphapexcel.com