Elegir ubicación mediante input para referenciar en range

Como podría usar la ubicación obtenida con un inputbox en la siguiente macro:

Sub Macro2()
Dim matriz As String, numerodefila As String, columna As Integer, ubicacion As Range
matriz = Application.InputBox("Selecciona la matriz", Type:=8).address(External:=True)

numerodefila = Sheets("Autoevaluacion").Range("r11").address(0, 0)

columna = Application.InputBox("Selecciona el numero de columna", Type:=1)
With Application
Set ubicacion = Application.InputBox("Selecciona la ubicacion a poner", Type:=8) - opcion anterior
End With - opcion anterior
ubicacion.Select - opcion anterior
'ActiveCell.Formula = "=INDEX(" & matriz & "," & numerodefila & "," & columna & ")" - opcion anterior
Para hacerlo de manera diferente con la siguiente; la cual me permite copiar la fórmula hasta la ultima fila con datos de esa región, funciona bien pero con el rango establecido, quisiera poder hacer que el rango se escoja para poder usarlo o situar la fórmula en cualquier celda que se elija:

With Hoja20.Range("n11").CurrentRegion

UltimaFila = .Rows(.Rows.Count).Row

Hoja20.Range("n11:n" & UltimaFila).Formula = "=INDEX(" & matriz & "," & numerodefila & "," & columna & ")"
End With
End Sub

Añade tu respuesta

Haz clic para o