Xin hỏi về gọi form nhập liệu bị lỗi "Run time error '380" khi Save As file có VBA định dạng .xsl sang .xslm (1 người xem)

[ThuyDuong2024]

Các anh chị cho em hỏi chút, em có 1 file nhập liệu bằng UseForm, code đã được một số bạn giúp. Khi tạo form và gán code thì chạy trên định dạng .xls, nhưng thấy định dạng này có dung lượng lớn nên e save về dạng .xlsm, cấu trúc dữ liệu và code không có gì thay đổi nhưng khi gọi form thì code báo lỗi "Run time error '380': ...Invalid property value", bị bôi vàng ở dòng lệnh "UserForm1.Show" trong code.
Đó là lỗi gì ạ?

 

[Hoàng Tuấn 868]

Xin hỏi về gọi form nhập liệu bị lỗi "Run time error '380" khi Save As file có VBA định dạng .xsl sang .xslm​

Chưa xem file nhưng thấy hình như phần đỏ đỏ có vẻ nhầm lẫn gì đó.

 

[huuthang_bd]

Lỗi đặt giá trị cho SpinButton vượt quá thuộc tính Max do số dòng file xlsm nhiều hơn file xls.

SpinButton1.Value = Cells.Rows.Count + 1 - ActiveCell.Row

 

[ThuyDuong2024]

Cảm ơn bác huuthang_bd đã hỗ trợ, e đã giải quyết đc lỗi rồi. Thay giá trị 65536 bằng 1048576 vào max của SpinButton và trong code là được.

 

[ThuyDuong2024]

Tiện đây cho em hỏi, cũng trong file trên, khi đặt chế độ trang in (pate setup) thì bấm nút Spin button thì con trỏ chuột nó lại xoay vòng khiến các tác vụ chậm hơn so với trước khi đặt?