Problemas con esta formula en visual: ActiveCell.Formula = "=HYPERLINK(,"""")"

Buenos días, necesito hacer lo siguiente:

crear un hipervínculo en una celda variable que contenga el link que esta en otra hoja y con celda variable.

ya tengo identificada la celda donde estará el link:

Worksheets("Informe").Cells(pci + A, pcj + p).Select

utilizo la siguiente formula:

'ActiveCell.Formula = "=HYPERLINK(*************,""Link"")"

ahora necesito que en donde están los ************ este lo siguiente:

Worksheets("Base").Cells(r + 2, 5).Value

'donde r, pci, A, pcj, p son variable de tipo entero.

el problema o la ayudo que necesito es escribir correctamente la formula para que no me arroje errores de sintaxis.

Agradezco su colaboración

1 respuesta

Respuesta
1

Después de identificar la celda donde irá el link, posiciónate en ella y ejecuta estas líneas de código:

fila = r + 2
columna = 5
sitio = Cells(r + 2, 5).Address
ActiveSheet.Hyperlinks.Add anchor:=ActiveCell, Address:="", SubAddress:="base" & "!" & sitio, TextToDisplay:="pulse aquí"

recuerda finalizar la consulta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas