Chưa có nhiều thời gian nên viết làm tạm file đơn giản như vậy
Cho e giải thích với
Bạn Enable Marco chưa? Chưa thì tìm hiểu chức năng này trước khi hoạt động file.
Sub a()
Code ở trong userForm hết đó bạn, bạn vào đó tham khảo nhé
Cám ơn a rất nhiều
bỏ nhắc (thông báo) trả lời sai, bạn có bỏ luôn thông báo trả lời đúng không?
Coi như đi thi anh ạ
anh ơi, trong file của anh có ghi 1 loạt đáp án A
FIle này mình sửa theo yêu cầu của cả #10 và #11 nhé, bạn test thử xem đúng chưa? toàn chữ "tàu" nên ngại test quá
câu 1 bị ra 2 lần anh ạ.FIle này mình sửa theo yêu cầu của cả #10 và #11 nhé, bạn test thử xem đúng chưa? toàn chữ "tàu" nên ngại test quá
mình gửi lại nhé
chuẩn rồi a ạ. Xin lỗi anh vì nhờ anh như đòi nợ.mình gửi lại nhé
)))))Nếu vậy thì nên điền kết quả ngay sau khi thí sinh trả lời (chọn) thì sẽ hợp lý hơn,chuẩn rồi a ạ. Xin lỗi anh vì nhờ anh như đòi nợ.
tiện giúp cho chót anh ạ.
e nhờ thêm 1 đoạn xíu xiu nữa thôi anh ah
khi ấn chữ "nộp bài" a viết thêm giúp em code để đáp án tự động điền đáp án chọn vaò cột "thí sinh chọn" ở phần đề bài được không ạ.
nếu chỉ cần thêm 1 dòng code có thể anh viết code giúp em vào đây với. để e còn học hỏi xem nó khác chỗ nào. a cứ làm giúp thì e nhờ a suốt thôi
Anh giúp e viết thử với.
Để e ngâm cứu thử
Bạn tham khảo file nhé
Các chữ trong đề thi trắc nghiệm sử dụng tiếng Nhật chứ không phải tiếng Tàu.FIle này mình sửa theo yêu cầu của cả #10 và #11 nhé, bạn test thử xem đúng chưa? toàn chữ "tàu" nên ngại test quá
)
nhấn vào bắt đầu nó hiện lên form => sau đó nhấn bắt đầu để vào bài thi.trong khi làm có thể nhấn kiểm tra trên form để kiểm tra xem là còn những câu nào chưa làm.và kết thúc bài bằng nút nộp bài.Kết quả trả về bên sheet nguồn 1
dạ rồi ạ!
dạ vâng em cám ơn ạ
anh ơi. bị lệch đáp án nữa rồi =)))
Tối thấy cái file của bạn nguyenthuy33388 đáp án có bị lệch đâu ta?
vẫn bị lệch câu trả lời anh ạ. nó cứ lấy đáp án của dòng dưới
anh bật cái thông báo nhắc nhờ trả lời sai lên anh ạ. nó toàn báo e kết qả của dòng dưới
Vậy thì bạn thử bỏ hết mấy dòng lệnh này đi
Private Sub OptionButton1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End Sub
Private Sub OptionButton2_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End Sub
Private Sub OptionButton3_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End Sub
Private Sub OptionButton4_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End SubCall chamdiemtắt luôn thông báo a ạ.
giaiphapexcel.com
rất ngại sửa file của người khác nhưng cái này cũng bé nên xin phép chủ file tôi sửa vầy bạn xem đi
e xem xong vẫn chua biết vì sao lại sửa được.
)) 
Trong sub CommandButton3_Click sửa
vẫn ko được anh ạ.
Bạn thử trong file.trong file có sửa ở sub
lệch ntn vậy bạn, mình test có thấy lệch đâu?
cho sub chamdiem vào sự kiện CommandButton3_Click() sẽ bị lệch kết quả bạn ạ
Thí sinh làm xong tắt file không lưu thì sao?
file này là dùng file cũ rồi. file mới bỏ phần chấm điể đi rồi mà?
kết quả thì không lệch nhưng làm xong phải nhấn nộp bài thôi,chỉ sửa cái phần bé trong file của bạn để hiện kết quả gợi ý đáp án không bị lệch xuống dòng dưới như chủ thớt yêu cầu còn lấy kết quả trong file vẫn giữ nguyên không hề động tới
đây là file của bạn nguyenthuy13388 chứ không phải file mình làm,chỉ là kết quả gợi ý bị lệch một dòng nên sửa giúp vốn dĩ file gốc cũng không có lưu,nhưng vì là file người khác nên mình không có sửa hết và có nói rõ rằng ở bài trên là ngại sửa file người khác chỉ sửa 1 phần bé để hiện thông báo gợi ý kết quả đúng không bị lệch dòng chứ không sửa code khác
nút chuyển tiếp của anh tự động nộp bài chấm điểm khi hết câu
Bạn mang file của tôi về sửa thì nó chả sai? Bạn xem lại file của tôi gửi ở bài #19, không có tình trạng không chấm điểm câu cuối, bản thích thêm hay bớt câu hỏi thì cứ vào đó tự ý thêm bớt, tuy nhiên cũng cần phải hiểu rõ sode thì mới chỉnh sửa tùy ý được.
dạ đúng anh ạ, đây là file 19
Vấn đề nó chả có gì lớn đâu,file ở bài 19 của bạn nếu như làm hết tất cả các câu thì đáp án có ghi hết đến câu cuối nhưng như bác HieuCD nói nếu như thí sinh nhấn X thoát form thì kết quả không lưu (nhưng cái này chưa nói tới)
1. Tôi đồng ý là sẽ còn phải chỉnh sửa rất nhiều để hoàn thiện (hoàn thiện theo cách nghĩ của mỗi người, kể cả tôi), tuy nhiên với yêu cầu ban đầu của chủ thớt thì tôi nghĩ đã đáp ứng hết.
Private Sub OptionButton1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End Sub
Private Sub OptionButton2_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End Sub
Private Sub OptionButton3_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End Sub
Private Sub OptionButton4_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Call chamdiem
End SubCái này thì thêm 1 dòng code cho sự kiện before close woorkbook là giải quyết được, cảm ơn anh đã nhắc nhở ạ
a ơi, tới bài 19 là xong file trắc nghiệm rồi ạ.
Nếu thích luyện tập dùng file này nhé
làm được bạn nhé
Làm giúp em với ạ
)) nốt cái này e đảm bảo là xong ạ
Bảo đảm xong không? Còn trộn câu hỏi? Trộn đáp án? Lưu kết quả thi? v.v ....Làm giúp em với ạ
Tri túc tiện túc đãi túc hà thời túc
Đang làm bài thi bị sự cố tắt máy tính, bài thi chưa lưu phải làm lại từ đầu?
Hồi xưa, đường dẫn còn yếu, mấy trang quép điền đơn bị cái này hoài.
Với file Excel có thể làm tương tự file cơ sở dữ liệu, khi nhập dữ liệu mới sẽ lưu lại, tuy tốn thời gian lưu nhưng khi bị sự cố nếu mở file lại được, dữ liệu không bị mất
ơ thế ai làm giúp em với ạ.
