vinculos

2 envíos / 0 nuevos
Último envío
Rosa
Imagen de Rosa
Offline
última acción: Hace 6 años 4 meses
alta: 20/07/2014 - 22:28
Puntos: 33
vinculos

Hice una base de datos en excel y a cada dato le coloqué vínculo para abra determinado documento en word o pdf según el caso.

Ahora resulta que cambió toda la dirección de los vínculos y estoy arreglándolos uno a uno pero es muy dispendioso. Qué puedo hacer?

pacomegia
Imagen de pacomegia
Offline
última acción: Hace 1 día 7 horas
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntosadministrador
alta: 27/12/2006 - 23:26
Puntos: 10690
Re: vinculos

Entiendo que al decir que colocaste un vínculo lo hiciste uno a uno

Para la próxima, pon el nombre del archivo en una celda, y luego utiliza la función HIPERVINCULO para crear el enlace al archivo, así es más sencillo de actualizar cuando se produzcan cambios.

En tu caso, podrías utilizar una macro para buscar y reemplazar en los vínculos; algo parecido a esto:

 

Sub BuscarReemplazarHipervinculosHojaActiva()

    Dim buscar As String, reemplazar As String

    Dim mihip As Hyperlink

    

    buscar = InputBox("Texto a BUSCAR")

    reemplazar = InputBox("REEMPLAZAR por", , buscar)

    For Each mihip In ActiveSheet.Hyperlinks

        mihip.Address = Replace(mihip.Address, buscar, reemplazar)

    Next

End Sub

 

------
Ya sé Excel, pero necesito más.