VBA - problemer med SetFocus
Jeg bruger nedenstående kode til at validere indtastningen i min formular og den fanger også forkerte indtastninger og kommer op med MsgBox, men den sender alligevel focus videre til næste felt, hvad er der galt?Private Sub txtTilbudsDato_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsDate(txtTilbudsDato) Then
MsgBox "Der skal indtastes en gyldig dato"
Me.txtTilbudsDato.SetFocus
Me.txtTilbudsDato.SelStart = 0
Me.txtTilbudsDato.SelLength = Len(txtTilbudsDato)
End If
End Sub
På forhånd tak :-)