Actulizar datos Hipervinculos

28/10/2007 - 12:01 por mgd | Informe spam
Hola a todos:
Quien podría ayudarme con lo siguiente:

Necesito uno icono-funcion en excel, para actualizar los datos de los
hipervinculos.

muchas gracias
(sois muy amables)

saludos.
"mgd"

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
28/10/2007 - 18:54 | Informe spam
hola, (...) ?

Necesito uno icono-funcion en excel, para actualizar los datos de los hipervinculos...



si suponemos que moviste de ubicacion/carpeta/... los archivos a donde "saltaban" los hipervinculos -?-
prueba con una macro +/- como la siguiente y...
si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

Sub CambiarCarpetaHipervinculos()
Dim Antes As String, Ahora As String, Salto As Hyperlink
Antes = "pon aqui la ruta a la ubicacion ANTERIOR de los documentos"
Ahora = "por aqui la ruta a la ubicacion ACTUAL de los documentos"
For Each Salto In ActiveSheet.Hyperlinks
If InStr(1, Salto.Address, Antes, 1) Then
If Val(Application.Version) > 8 Then _
If Salto.TextToDisplay = Salto.Address Then Salto.TextToDisplay = Ahora
Salto.Address = Application.Substitute(LCase(Salto.Address), LCase(Antes), Ahora)
End If
Next
End Sub
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida