VB Code Help " Error Variable not Defined " and Run time Error "438""

Please help me as soon as possible :banghead:

I am just new at VBA codeing plz help me

I have a code for VBA for Data entry form after I finish it the It shows the above errors " Error Variable not Defined " and Run time Error "438" which take the data from Form Sheet to Data sheet

Attachment 24402 Attachment 24403

Please help me as fast as possible . Kindly find attached excel file for help plz



Thank you for your consideration
Respectfully