UserForm không thể thêm dữ liệu vào sheet (2 người xem)

[sacalataba127]

Chào chú bác trên diên đàn
Chúc mọi người ngày thứ 2 vui vẻ

Em xin trình bày vấn đề của em, mong mọi người chỉ giúp e với ạ

Em có tạo 1 File nhập liệu bằng Uniform, nhưng đột nhiên đang bình thường bỗng dưng lỗi.
Cụ thể là chức năng thêm dữ liệu vào Sheet, từ dữ liệu đã nhập ở User Form bị lỗi.
Em debug trên nhiều máy có máy báo Disconnect with Client, có máy ko báo tắt luôn form, tắt luôn cả workbook.
Em gửi file nhờ mọi người xem giùm e với ạ.
Em cảm ơn.

 

[sacalataba127]

Mọi người ơi giúp e với ạ

 

[Maika8008]

Mọi người ơi giúp e với ạ

Bạn thử chuyển sang dạng xlsm xem sao. Nếu không được thì báo lại

 

[sacalataba127]

Bạn thử chuyển sang dạng xlsm xem sao. Nếu không được thì

Vẫn lỗi ạ bạn ơi

 

[Maika8008]

Vẫn lỗi ạ bạn ơi

Tôi thấy báo lỗi này

 

[sacalataba127]

Tôi thấy báo lỗi này
View attachment 253131
View attachment 253132

vâng quá trời lỗi, bebug vào cuối cùng hiện ra đủ thứ. Nên mới nhờ mọi người xem thế nào ạ

 

[Maika8008]

Tôi thấy báo lỗi này
View attachment 253131
View attachment 253132

Bạn cũng kỳ, đã debug được đến hàm AddNewData(arrTest As Variant, rowAdds As Long) rồi mà không nói ra luôn. Muốn thử anh em à?

 

[sacalataba127]

Bạn cũng kỳ, đã debug được đến hàm AddNewData(arrTest As Variant, rowAdds As Long) rồi mà không nói ra luôn. Muốn thử anh em à?

Sơ suất chút, sorry bác nhé

 

[Maika8008]

Sơ suất chút, sorry bác nhé

Bây giờ bạn thử bấm MỚI => nhập thông tin => LƯU xem có bị lỗi không nhé. Tôi thử thấy không bấm MỚI là bị lỗi đấy

 

[sacalataba127]

Bây giờ bạn thử bấm MỚI => nhập thông tin => LƯU xem có bị lỗi không nhé. Tôi thử thấy không bấm MỚI là bị lỗi đấy

Đã thử khá nhiều, Có thể lần đầu không bị nhưng những lần sau lại bị mặc dù có bấm MỚI. chạy bug vẫn dính lỗi chỗ AddNewData.

 

[Maika8008]

Đã thử khá nhiều, Có thể lần đầu không bị nhưng những lần sau lại bị mặc dù có bấm MỚI. chạy bug vẫn dính lỗi chỗ AddNewData.

Tôi biết lý do rồi nhưng đang tìm hiểu vì sao nó như thế. Bạn lưu dòng mới nhưng chức năng Table không làm việc. Nó không cho thêm dòng nên sinh ra lỗi. Bạn thử thêm thủ công 1 số dòng trong Table rồi chạy code lại xem, đảm bảo không lỗi nữa.

 

[sacalataba127]

Tôi biết lý do rồi nhưng đang tìm hiểu vì sao nó như thế. Bạn lưu dòng mới nhưng chức năng Table không làm việc. Nó không cho thêm dòng nên sinh ra lỗi. Bạn thử thêm thủ công 1 số dòng trong Table rồi chạy code lại xem, đảm bảo không lỗi nữa.

Đúng thật không lỗi thật. Table excel thật vi diệu.Maika8008 thật vi diệu

​

 

[SA_DQ]

Mình thấy trong các macro của chủ bài đăng nhiều câu lệnh
On Error GoTo ErrExit
Điều này mình hoàn toàn tán thành
Nhưng sau nhãn ErrExit của bạn bạn chưa tìm hiểu đó là lỗi gì (1), do đâu & lỗi ở dòng lệnh nào (2) trong macro.
(1) Mã lỗi là gì?, Thông tin về lỗi này
Lỗi trong tầm tay hay ngoài tầm của bạn
(2) Nên xài hàm Erl() để có thêm thông tin về dòng gây lỗi.

Chúc các bạn vui trong tuần!

 

[sacalataba127]

Mình thấy trong các macro của chủ bài đăng nhiều câu lệnh
On Error GoTo ErrExit
Điều này mình hoàn toàn tán thành
Nhưng sau nhãn ErrExit của bạn bạn chưa tìm hiểu đó là lỗi gì (1), do đâu & lỗi ở dòng lệnh nào (2) trong macro.
(1) Mã lỗi là gì?, Thông tin về lỗi này
Lỗi trong tầm tay hay ngoài tầm của bạn
(2) Nên xài hàm Erl() để có thêm thông tin về dòng gây lỗi.

Chúc các bạn vui trong tuần!

Dạ cảm ơn anh ạ.
E đã tìm err.description và err.Number về mã lỗi trả về mà Search nhiều trang, mà không tìm thấy mô tả nào về lỗi trên ạ.
Chỉ là khi tải lên, em xóa bớt nhiều tệp không cần thiết, nên có khi xóa luôn debug trên đó ạ.
Còn về erl thì nó toàn trả về 0.
Cảm ơn anh đã quan tâm ạ.

 

[SA_DQ]

Dạ cảm ơn anh ạ.
(2) E đã tìm err.description và err.Number về mã lỗi trả về mà Search nhiều trang, mà không tìm thấy mô tả nào về lỗi trên ạ.
Chỉ là khi tải lên, em xóa bớt nhiều tệp không cần thiết, nên có khi xóa luôn debug trên đó ạ.
(1) Còn về erl thì nó toàn trả về 0. . . .

(1) Bạn đã đánh số các dòng lệnh chưa? Chú ý là số của các dòng lệnh không trùng nhau nha
Để vậy, ban đầu nên đánh thưa ra, sau đó đánh số lại, 1 khi đã phát hiện khoảng dòng lỗi, thì khoảng đó nên đánh số sít lại

(2) Mình chưa hề chạy các macro của bạn; Bạn có thể cho biết mã lỗi đó hay không?

 

[sacalataba127]

(1) Bạn đã đánh số các dòng lệnh chưa? Chú ý là số của các dòng lệnh không trùng nhau nha
Để vậy, ban đầu nên đánh thưa ra, sau đó đánh số lại, 1 khi đã phát hiện khoảng dòng lỗi, thì khoảng đó nên đánh số sít lại

(2) Mình chưa hề chạy các macro của bạn; Bạn có thể cho biết mã lỗi đó hay không?

Dạ
(1) Dạ e đã đặt và tìm đươc lỗi ở dòng nào và có ghi chú ở File gửi lên rồi đó ạ
(2) Còn mã lỗi cụ thể e Test nhiều máy thì nội dung mã là ...