Usando la salida de FindString en VBA - excel, vba, excel-vba

Me gustaría pedir su ayuda nuevamente. Trabajando en un bit de VBA que abre un Inputbox, y encuentra un cierto valor en la hoja de trabajo X, y luego corta la fila completa a la hoja de trabajo Y. He completado la parte Inputbox / FindString, que se muestra en; .

Mi pregunta es bastante simple; ¿Cómo usaría elvalor encontrado por Inputbox / Findstring? Con la intención de utilizar este valor para crear el código que corta la fila completa y elimina el espacio restante.

Respuestas

If Not Rng Is Nothing Then
Rng.Copy
Worksheet("Y").Range("A1").Paste
Rng.EntireRow.Delete
Else
MsgBox("Nothing found")
End If

Como ya tienes la variable de rango Rng, Yo haría algo como esto:

Rng.Cut
DestinationSheet.Range("destinationRange").select.Paste