Ir a una celda a través de una referencia

Pues con una macro no es difícil, pones un botón en la hoja y le asignas la macro, si quieres buscar el valor de una celda fija, si quieres buscar un valor variable en un rango fijo cambia la linea en negrita por esta:
celda=Inputbox("Que valor busco")
Sub buscar_situarte()
Dim celda As String
celda = Range("C5").Value
Range("R1:R100").Select
Selection.Find(What:=celda).Activate
End Sub
Y si lo que quieres es valor variable y en rango variable pues utilizas esta:
Sub buscar_situarte()
Dim celda As String
celda=Inputbox("Que valor busco")
donde = InputBox("En rango busco") 'El valor a escribir será R1:R100
Range(donde).Select
Selection.Find(What:=celda).Activate
End Sub
Espero que te haya servido si es así puntúa y finaliza la consulta. Gracias, si necesitas alguna aclaración me lo dices.
>Un saludo
>Julio