Saltar al contenido

Error en vínculos excel por cambio computadora


aparamio

Recommended Posts

publicado

Hola,

Acabo de cambiar mi computadora y no me reconoce ningún vínculo en todos mis archivos de excel.

Antes la ruta era c/users/Andy/Documents y ahora es c/usuarios/Andrea/Documentos.

Quería saber si hay alguna forma de modificar la ruta masivamente o si debo cambiar la configuración del equipo cambiando usuarios e idioma

Espero que puedan ayudarme

Gracias

Andrea

publicado

Gracias por la respuesta. El problema es que son cientos de archivos con muchs links entre sí y quería encontrar una forma más simple para cambiar todo sin tener que editar las fórmulas. Gracias de todas formas

publicado

Hola de nuevo @[uSER=67610]aparamio[/uSER]

Te dejo una opción con macros. Inserta un módulo en VBA y pega el siguiente código:

Sub CambiarHipervínculos()
Dim RutaAntigua As String
Dim RutaNueva As String
Dim h As Hyperlink
RutaAntigua = "c:\users\Andy\Documents"
RutaNueva = "c:\usuarios\Andrea\Documentos"
For Each h In ActiveSheet.Hyperlinks
x = InStr(1, h.Address, RutaAntigua)
If x > 0 Then
If h.TextToDisplay = h.Address Then
h.TextToDisplay = RutaNueva
End If
h.Address = Application.WorksheetFunction. _
Substitute(h.Address, RutaAntigua, RutaNueva)
End If
Next
End Sub[/CODE]

Comentas! Dios te bendiga!

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.