Excel, desmarcar columna y seleccionar celda

Solicito su valiosa ayuda con lo siguiente

De un listado el usuario se ubica con el cursor sobre la cualquier celda de la columna H, al darle click al botón realiza la búsqueda de los datos en un rango y copia algunos de ellos en varios textbox.

Cuando termina la acción, me deja seleccionada toda la columna H.

¿Qué línea puedo agregar para que cuando termine me deje seleccionada la celda que se había escogido al comienzo?

Este es el código del botón:

Private Sub btnValidar_Click()

'Elije el producto

    If Intersect(Range("h:h"), ActiveCell) Is Nothing Then Exit Sub

    txbCodigoProductoPDM.Value = ActiveCell.Value

'Busca Producto

    Dim RegistroBuscar As String

    RegistroBuscar = txbCodigoProductoPDM.Value

    Sheets("FormularioPDM").Select

    Columns("h:h").Select

    Selection.Find(What:=RegistroBuscar, After:=ActiveCell, LookIn:=xlFormulas, LookAt _

        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _

        False, SearchFormat:=False).Activate

'llena los TextBox

    txbDescripcionPDM.Value = ActiveCell.Offset(0, 3)

End Sub