[Resolvido]Formulario não envia mensagem de salvar

Boa noite,

Alguem já passou por esta situação:

No meu PC fiz um cadastro de clientes e coloquei um botao salvar, no meu PC ele mostra tudo certinho, porem no meu Notebook a mensagem VBInfotation não aparece, ele simplesmente salva e não mostra mensagem nenhuma, alguem sabe o porque?

Ambos sao Access 2010.

O Office está atualizado com os service packs? Windows tambem? Poste aí o código completo para vermos.

Meu notebook é Windows 7 home basic e meu PC é windows 7 ultimate, ambos SP 1. Segue o codigo



Private Sub Salvar_Click()
' VERIFICA SE O REGISTRO É NOVO
If NewRecord Then

If IsNull(Me.codigoFornecedor) Then
MsgBox "Não há dados para Salvar", vbInformation, "Advantage- Aviso"

Else

' QUESTIONA O SALVAMENTO PARA SIM OU NÃO
If MsgBox("SALVAR O REGISTRO?", vbYesNo, "Aviso") = vbNo Then
'SE NÃO, CANCELA E DIZ QUE CANCELOU
Me.Undo
MsgBox "PROCESSO CANCELADO PELO USUÁRIO", vbInformation
Else 'SE SIM, SALVA O REGISTRO E DIZ QUE SALVOU
DoCmd.RunCommand acCmdSaveRecord
MsgBox "O REGISTRO FOI SALVO", vbInformation, "Advantage- Cadastro de Produto"
DoCmd.GoToRecord , , acNewRec

End If
End If
End If


End Sub

Algumas vezes ele funciona outras nao.

Acho que descobri a solução, eu adcionei o codigo ao carregar DoCmd.GoToRecord , , acNewRec, e ele funcionou direitinho....

Muito obrigado!!!!