Erro de compilaçao rótulo não definido

Estou aprendendo a criar no access, e estou tendo problema para criar os botoes.
Quando clico no botao novo aparece a mensagem: erro de compilação, rótulo não definido.


Private Sub BOTAONOVO_Click()
On Error GoTo BOTAONOVO_Err

Me.TEXTODESCRIÇÃO.Enabled = True
Me.TEXTOPREÇO.Enabled = True
Me.TEXTOPRODUTO.Enabled = True
Me.TEXTOQUANTIDADE.Enabled = True
Me.TEXTOTAMANHO.Enabled = True


   DoCmd.GoToRecord acDataForm, "FORMULARIO_PRODUTO", acNewRec
   
BOTAONOVO_Click_Exit:
  Exit Sub
 
BOTAONOVO_Click_Err:
  MsgBox Error$
  Resume BOTAONOVO_Click_Exit

End Sub


Me ajude por favor

tente assim:

Uma dica: Não crie campo assim: TEXTODESCRIÇÃO

Crie assim: txtdescricao

Código:

Private Sub BOTAONOVO_Click()
On Error GoTo Err_BOTAONOVO_Click

Me.TEXTODESCRIÇÃO.Enabled = True
Me.TEXTOPREÇO.Enabled = True
Me.TEXTOPRODUTO.Enabled = True
Me.TEXTOQUANTIDADE.Enabled = True
Me.TEXTOTAMANHO.Enabled = True

TEXTODESCRIÇÃO.SetFocus


    DoCmd.GoToRecord , , acNewRec

Exit_BOTAONOVO_Click:
    Exit Sub

Err_BOTAONOVO_Click:
    MsgBox Err.Description
    Resume Exit_BOTAONOVO_Click
End Sub


ainda nao resolveu!!
me passa o cod correto, eu to fazendo seguindo suas videos aulas, mas emperrei nos codigos



Private Sub BOTAONOVO_Click()
On Error GoTo Err_BOTAONOVO_Click

Me.txtdescricao.Enabled = True
Me.txtpreco.Enabled = True
Me.txtproduto.Enabled = True
Me.txtquantidade.Enabled = True
Me.txttamanho.Enabled = True

txtdescricao.SetFocus


DoCmd.GoToRecord , FORMULARIO_PRODUTO, acNewRec

Exit_BOTAONOVO_Click:
Exit Sub

Err_BOTAONOVO_Click:
MsgBox Err.Description
Resume Exit_BOTAONOVO_Click
End Sub

Baixe o exemplo das aulas
Está no item nº 12 dessa lista:
Exemplos-Access