Câu lệnh INSERT TO = query insert (bạn nghiên cứu thêm về query nhé)
Code trong command Chuyển sang (VD thế
)
Docmd.SetWarings False
docmd.runsql "câu lệnh INSERT TO ..."
' Thông báo chuyển thành công của bạn
Msgbox "Cái gì đó", 64, "Chúc mừng nha"
' Nếu mỗi bảng bạn thể hiện bằng 1 subform trên form
' VD: bảng nguồn = subform1, bảng đích = subform2
' Cập nhật lại subform
Subform1.requery
Subform2.requery
Docmd.SetWarnings True