pegar solo hipervinculo

¿Quieres sacar solo uno o necesitas un proceso automático para copiar y pegar muchos hipervinculos?


Uno Solo
Botón derecho, editar hipervinculo.

Muchos
Puedes crear una macro que lea esta información utilizando esta expresión:

Range("A1").Hyperlinks.Item(1).Address

Suponiendo que el hipervinculo está en la celda A1


Si se trata de la segunda opción "Muchos", puedo ayudarte a hacer la macro.

Saludos.

On 9 Feb, 16:41, "Pedro F. Pardo" wrote:

¿Quieres sacar solo uno o necesitas un proceso automático para copiar y pegar muchos hipervinculos?

Uno Solo
Botón derecho, editar hipervinculo.

Muchos
Puedes crear una macro que lea esta información utilizando esta expresión:

Range("A1").Hyperlinks.Item(1).Address

Suponiendo que el hipervinculo está en la celda A1

Si se trata de la segunda opción "Muchos", puedo ayudarte a hacer la macro.

Saludos.

Hola, gracias por tu ayuda, pero pego la funcion en una celda i no
funciona,

Tal como funciona en una celda en que se junta el texto y el
hipervinculo, tambien habrias de funcionar al reves pero no se como?

el ejemplo es este:

Energía eólica y conservación de fauna http://blogs.publico.es/pluma-y-conservacion/,
solo se veria el texto pero el vinculo funcionaria,

gracias

No entiendo muy bien tu pregunta. Pero haz lo siguiente.

Elige una celda cualquiera. Click con el botón derecho. Te aparece un menú y hay una opción que dice: Hipervínculo.

Si haces click en esta opción te aparece una ventana en la que puedes escribir:

El texto que quieres que se vea y abajo la dirección del hipervínculo.

Si quieres puedes pegar como texto visible la misma dirección.

¿Es eso lo que buscas?

Saludos