Macro buscar valor y seleccionar rango hasta el valor ingresado.

La macro debe buscar en la matriz a10:f177 un numero ingresado en la celda i10 y seleccionar hasta el mes que marca la celda.

Sub Copiardatos()

Selection. Copy

'abre documento de word
SwMSWord. Documents. Open ("ruta")
swMSWord.Selection.PasteSpecial link:=True
Set swMSWord = Nothing

End Sub