WHEN I WRITE THE FOLLOWING CODE, IT SHOWS ME THAT EXCEL HAS ENCOUNTERED A PROBLEM & IT CLOSES THE FILE SHOWING SEND ERROR REPORT OR DONT SEND. PLEASE HELP ME OUT OF THIS PROBLEM


Private Sub TempCombo_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
'Hide combo box and move to next cell on Enter and Tab
Select Case KeyCode
'FOR ENTER
Case 13
ActiveCell = TEMPCOMBO.Text
ActiveCell.Offset(1, 0).Activate
Case Else
'do nothing
End Select
ERRORHANDLER:
END SUB