Datagridview validación celdas

Hola
Quiero validar el contenido de una celda de un datagridview. Para ello en la
función CellValidated del datagridview compruebo si los datos introducidos
cumplen el formato y lo que quiero es que si no cumple el formato no me deje
salir de la celda hasta que sea correcto, pero no se como volver a poner el
foco en la celda.

La función que utilizo es la siguiente:
Private Sub dgrid_CellValidated(ByVal sender As Object, ByVal e As
System.Windows.Forms.DataGridViewCellEventArgs) Handles dgrid.CellValidated

If Not Me.dgrid.Item(e.ColumnIndex, e.RowIndex).Value Is Nothing Then
Dim sMensaje As String =
oComun.ComprobarFormato(Me.dgrid.Item(e.ColumnIndex, e.RowIndex).Value,
Me.dgrid.Columns(e.ColumnIndex).Name, 0) --si el formato es incorrecto
devuelve un mensaje de error
If sMensaje <> "" Then
MsgBox(sMensaje , MsgBoxStyle.Exclamation, "Error")
' Me.dgLineasMP.Item(e.ColumnIndex, e.RowIndex).Value =
iValorAnterior
'Me.dgLineasMP.CurrentCell = Me.dgLineasMP(e.ColumnIndex,
e.RowIndex)
'Me.dgLineasMP.Focus()

End If
End If
End Sub


Gracias