Mauro obrigado pela atenção!
A rotina para o campo é este:
Private Sub TextBox1_BeforeUpdate(ByVal Cancel As msforms.ReturnBoolean)
Cancel = True
If Not IsNumeric(TextBox1) Or IsEmpty(TextBox1) Then
MsgBox ("Você digitou um Número da Informação Inválido !"), vbCritical, "Testando Número da Informação Fiscal"
TextBox1.SetFocus
TextBox1.Value = vbNullString
Else
Cancel = False
End If
End Sub
Anteriormente esta rotina foi executada na versão 2000 do Excel. Na ocorência do erro, o cursor não retornava automaticamente para o campo, apesar do comando SetFocus.
Ontem à noite executei em outro micro agora com versão 2007 do Excel. E agora funcionou conforme previsto.
Minha pergunta agora é : existe uma limitação na versão anterior para o comando SetFocus ?
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 19/10/2011 8:10 am