Botão Novo registro

Ola pessoal to com uma duvida aq tenho um botão para adicionar novo registro tem o seguinte código

Private Sub Comando79_Click()
DoCmd.RunCommand acCmdRecordsGoToNew
If MsgBox("Deseja Inserir Novo Registro!!!", vbOKOnly + vbYesNo, "Sistema Academia") = vbYes Then
Dados_Cadastrais.Enabled = True
Adicionais.Enabled = True
Calculos.Enabled = True
Avaliações.Enabled = True
Cód_Aluno.SetFocus

End If
End Sub

funciona perfeitamento porem somente quando ja tem o aluno cadastrado se n tiver nenhum ele da erro que n pode ir a um novo registro.
o que eu queria seria como faria para incrementar a função e checar se esta ja num novo registro pq dai checando ele so habilita os campos tipo.
Dados_Cadastrais.Enabled = True
Adicionais.Enabled = True
Calculos.Enabled = True
Avaliações.Enabled = True
Cód_Aluno.SetFocus