Como extraer un hipervínculo

01/06/2009 - 10:20 por eclat2k | Informe spam
Muy buenas a tod@s, tengo una duda sobre como hacer esto en excel.

Tengo una hoja donde en una determinada celda tengo un texto, por
ejemplo, "Ficha", que a su vez tiene un hipervínculo asociado a la
ficha de un producto. Querría saber si hay alguna fórmula para poder
poner en otra celda el texto del hipervínculo.

Por ejemplo, celda A1, texto "Ficha", hipervínculo a www.microsoft.com/teclado_1,
lo que quiero es poder tener en la celda B1 el texto www.microsoft.com/teclado_1.

No sé si me habré explicado bien.

Muchas gracias de antemano.

Un saludo

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
01/06/2009 - 19:57 | Informe spam
hola (...), ?????

Tengo una hoja donde en una determinada celda tengo un texto, por ejemplo, "Ficha"
que a su vez tiene un hipervinculo asociado a la ficha de un producto.
Querria saber si hay alguna formula para poder poner en otra celda el texto del hipervinculo.
Por ejemplo, celda A1, texto "Ficha", hipervinculo a www.microsoft.com/teclado_1,
lo que quiero es poder tener en la celda B1 el texto www.microsoft.com/teclado_1.



prueba con una funcion personalizada (en modulo de codigo estandar en vba) +/- como la siguiente:

function mostrar_hipervinculo(celda as range) as string
mostrar_hipervinculo = celda.cells(1).hyperlinks(1).address
end function

luego en tu celda [B1] la usas como funcion "normal" +/- asi:

[B1] =mostrar_hipervinculo(a1)

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.
Respuesta Responder a este mensaje
#2 Eclat
02/06/2009 - 12:54 | Informe spam
On 1 jun, 19:57, "Héctor Miguel"
wrote:
hola (...), ?????

> Tengo una hoja donde en una determinada celda tengo un texto, por ejemplo, "Ficha"
> que a su vez tiene un hipervinculo asociado a la ficha de un producto.
> Querria saber si hay alguna formula para poder poner en otra celda el texto del hipervinculo.
> Por ejemplo, celda A1, texto "Ficha", hipervinculo awww.microsoft.com/teclado_1,
> lo que quiero es poder tener en la celda B1 el textowww.microsoft.com/teclado_1.

prueba con una funcion personalizada (en modulo de codigo estandar en vba) +/- como la siguiente:

function mostrar_hipervinculo(celda as range) as string
  mostrar_hipervinculo = celda.cells(1).hyperlinks(1).address
end function

luego en tu celda [B1] la usas como funcion "normal" +/- asi:

[B1] =mostrar_hipervinculo(a1)

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.



Estooo, te parecerá una tontería, pero después de buscar durante un
buen rato en mi Excel 2007 no veo donde puedo meter esa fórmula. He
estado buscando y en teoría, dentro de la pestaña de fórmulas/insertar
función... debería haber una categoría de fórmulas "Definidas por el
usuario", pero no la tengo. Voy a revisar la instalación por si
necesito añadir algún paquete que no esté activado.

Te informo con la evolución.

Y mil gracias por la ayuda.

Salu2.
Respuesta Responder a este mensaje
#3 Héctor Miguel
02/06/2009 - 21:40 | Informe spam
hola (...), ?????

__ OP __
... despues de buscar durante un buen rato en mi Excel 2007 no veo donde puedo meter esa formula.
He estado buscando y en teoria, dentro de la pestana de formulas/insertar funcion...
deberia haber una categoria de formulas "Definidas por el usuario", pero no la tengo.
Voy a revisar la instalacion por si necesito anadir algun paquete que no este activado...



esa funcion no existe en tanto no la pongas tu en un mudulo de codigo estandar en el proyecto de macros

- abre el editor de vba (atajo de teclado: alt + F11)
- inserta un modulo de codigo (menu: insertar / modulo)
- copia/pega (o escribe) las instrucciones del mensaje anterior
- cierra el editor de vba y regresa a excel

ahora si, busca/usa/... la funcion "definida": (p.e.) =mostrar_hipervinculo(a1)

saludos,
hector.

__ previos __
Tengo una hoja donde en una determinada celda tengo un texto, por ejemplo, "Ficha"
que a su vez tiene un hipervinculo asociado a la ficha de un producto.
Querria saber si hay alguna formula para poder poner en otra celda el texto del hipervinculo.
Por ejemplo, celda A1, texto "Ficha", hipervinculo awww.microsoft.com/teclado_1,
lo que quiero es poder tener en la celda B1 el textowww.microsoft.com/teclado_1.



prueba con una funcion personalizada (en modulo de codigo estandar en vba) +/- como la siguiente:

function mostrar_hipervinculo(celda as range) as string
mostrar_hipervinculo = celda.cells(1).hyperlinks(1).address
end function

luego en tu celda [B1] la usas como funcion "normal" +/- asi:

[B1] =mostrar_hipervinculo(a1)

si cualquier duda (o informacion adicional)... comentas ?
Respuesta Responder a este mensaje
#4 Eclat
04/06/2009 - 18:00 | Informe spam
On 2 jun, 21:40, "Héctor Miguel"
wrote:
hola (...), ?????

__ OP __

> ... despues de buscar durante un buen rato en mi Excel 2007 no veo donde puedo meter esa formula.
> He estado buscando y en teoria, dentro de la pestana de formulas/insertar funcion...
> deberia haber una categoria de formulas "Definidas por el usuario", pero no la tengo.
> Voy a revisar la instalacion por si necesito anadir algun paquete que no este activado...

esa funcion no existe en tanto no la pongas tu en un mudulo de codigo estandar en el proyecto de macros

- abre el editor de vba (atajo de teclado: alt + F11)
- inserta un modulo de codigo (menu: insertar / modulo)
- copia/pega (o escribe) las instrucciones del mensaje anterior
- cierra el editor de vba y regresa a excel

ahora si, busca/usa/... la funcion "definida": (p.e.) =mostrar_hipervinculo(a1)

saludos,
hector.

__ previos __

>> Tengo una hoja donde en una determinada celda tengo un texto, por ejemplo, "Ficha"
>> que a su vez tiene un hipervinculo asociado a la ficha de un producto.
>> Querria saber si hay alguna formula para poder poner en otra celda el texto del hipervinculo.
>> Por ejemplo, celda A1, texto "Ficha", hipervinculo awww.microsoft.com/teclado_1,
>> lo que quiero es poder tener en la celda B1 el textowww.microsoft.com/teclado_1.

> prueba con una funcion personalizada (en modulo de codigo estandar en vba) +/- como la siguiente:

> function mostrar_hipervinculo(celda as range) as string
> mostrar_hipervinculo = celda.cells(1).hyperlinks(1).address
> end function

> luego en tu celda [B1] la usas como funcion "normal" +/- asi:

> [B1] =mostrar_hipervinculo(a1)

> si cualquier duda (o informacion adicional)... comentas ?



Eres un fenómeno... todo ok, mil gracias.
Respuesta Responder a este mensaje
#5 Eclat
04/06/2009 - 18:03 | Informe spam
On 2 jun, 21:40, "Héctor Miguel"
wrote:
hola (...), ?????

__ OP __

> ... despues de buscar durante un buen rato en mi Excel 2007 no veo donde puedo meter esa formula.
> He estado buscando y en teoria, dentro de la pestana de formulas/insertar funcion...
> deberia haber una categoria de formulas "Definidas por el usuario", pero no la tengo.
> Voy a revisar la instalacion por si necesito anadir algun paquete que no este activado...

esa funcion no existe en tanto no la pongas tu en un mudulo de codigo estandar en el proyecto de macros

- abre el editor de vba (atajo de teclado: alt + F11)
- inserta un modulo de codigo (menu: insertar / modulo)
- copia/pega (o escribe) las instrucciones del mensaje anterior
- cierra el editor de vba y regresa a excel

ahora si, busca/usa/... la funcion "definida": (p.e.) =mostrar_hipervinculo(a1)

saludos,
hector.

__ previos __

>> Tengo una hoja donde en una determinada celda tengo un texto, por ejemplo, "Ficha"
>> que a su vez tiene un hipervinculo asociado a la ficha de un producto.
>> Querria saber si hay alguna formula para poder poner en otra celda el texto del hipervinculo.
>> Por ejemplo, celda A1, texto "Ficha", hipervinculo awww.microsoft.com/teclado_1,
>> lo que quiero es poder tener en la celda B1 el textowww.microsoft.com/teclado_1.

> prueba con una funcion personalizada (en modulo de codigo estandar en vba) +/- como la siguiente:

> function mostrar_hipervinculo(celda as range) as string
> mostrar_hipervinculo = celda.cells(1).hyperlinks(1).address
> end function

> luego en tu celda [B1] la usas como funcion "normal" +/- asi:

> [B1] =mostrar_hipervinculo(a1)

> si cualquier duda (o informacion adicional)... comentas ?



Funcionó todo correctamente. Era precisamente eso lo que no encontraba
gráficamente, el editor de VBA.

Muchas gracias, eres un fenómeno.

Un saludo
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida