Validar entrada numérica en DataGridView

Voy a explicar cómo conseguí validar, en una columna de un DataGridView en vb.net 2010, que el campo introducido sea numérico, incluyendo la coma decimal.

Aquí os dejo el código:

    '----------------------------------------------------------------------------------
    '
    '
    ' INICIO RUTINA PARA VALIDAR CAMPOS NUMÉRICOS EN DATAGRIDVIEW
    '
    '
    '----------------------------------------------------------------------------------
    Private WithEvents cellTextBox As DataGridViewTextBoxEditingControl

    Private Sub cellTextBox_KeyDown( _
        ByVal sender As Object, _
        ByVal e As System.Windows.Forms.KeyEventArgs) Handles cellTextBox.KeyDown

    End Sub

    Private Sub cellTextBox_KeyPress( _
        ByVal sender As Object, _
        ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles cellTextBox.KeyPress
        e.KeyChar = ValidarCampoNumerico(e.KeyChar, cellTextBox.Text)
    End Sub

    Private Sub cellTextBox_KeyUp( _
        ByVal sender As Object, _
        ByVal e As System.Windows.Forms.KeyEventArgs) Handles cellTextBox.KeyUp

    End Sub

    Private Sub DataGridView1_EditingControlShowing( _
                    ByVal sender As Object, _
                    ByVal e As DataGridViewEditingControlShowingEventArgs) _
                    Handles ReparacionesdetDataGridView.EditingControlShowing

        ' Este evento se producirá cuando la celda pasa a modo de edición.

        ' Referenciamos el control DataGridViewTextBoxEditingControl actual.
        '
        cellTextBox = TryCast(e.Control, DataGridViewTextBoxEditingControl)

        ' Obtenemos el estilo de la celda actual
        '
        Dim style As DataGridViewCellStyle = e.CellStyle

        ' Mientras se edita la celda, aumentaremos la fuente
        ' y rellenaremos el color de fondo de la celda actual.
        '
        With style
            .Font = New Font(style.Font.FontFamily, 10, FontStyle.Bold)
            .BackColor = Color.Beige
        End With

    End Sub
    '----------------------------------------------------------------------------------
    '
    '
    ' FIN RUTINA PARA VALIDAR CAMPOS NUMÉRICOS EN DATAGRIDVIEW
    '
    '
    '----------------------------------------------------------------------------------

El resultado será el de la imagen.

Agradecimientos a:http://mvp-access.es/softjaen/vbnet/framework/dgv/sjvbnetdgv01.htm