Note: The other languages of the website are Google-translated. Back to English

¿Cómo cambiar varias rutas de hipervínculo a la vez en Excel?

Para algún propósito, puede crear múltiples hipervínculos para sus datos en la hoja de trabajo, y todos los hipervínculos están vinculados a la misma ruta de archivo o dirección, pero ahora, debe reemplazar esta ruta de hipervínculo con otra dirección a la vez. Cambiar la ruta de los hipervínculos individualmente puede perder mucho tiempo, ¿hay alguna forma rápida de resolver este problema?

Cambie varias rutas de hipervínculo a la vez en una hoja de trabajo con código VBA

Cambie múltiples rutas de hipervínculos a la vez en una hoja de trabajo / libro de trabajo / múltiples hojas / selección con una característica sorprendente


Cambie varias rutas de hipervínculo a la vez en una hoja de trabajo con código VBA

Suponiendo que tiene una lista de datos con los mismos hipervínculos que se muestran en la siguiente captura de pantalla, y con un código VBA, puede reemplazar rápidamente la ruta o dirección del archivo anterior en una hoja de trabajo por una nueva.

1. Mantenga pulsado el botón ALT + F11 llaves, y abre el Ventana de Microsoft Visual Basic para aplicaciones.

2. Presione recuadro > Móduloy pegue la siguiente macro en el Ventana del módulo.

Código VBA: cambie múltiples rutas de hipervínculo a la vez

Sub ReplaceHyperlinks()
'Updateby Extendoffice
Dim Ws As Worksheet
Dim xHyperlink As Hyperlink
Dim xOld As String, xNew As String
xTitleId = "KutoolsforExcel"
Set Ws = Application.ActiveSheet
xOld = Application.InputBox("Old text:", xTitleId, "", Type:=2)
xNew = Application.InputBox("New text:", xTitleId, "", Type:=2)
Application.ScreenUpdating = False
For Each xHyperlink In Ws.Hyperlinks
    xHyperlink.Address = Replace(xHyperlink.Address, xOld, xNew)
Next
Application.ScreenUpdating = True
End Sub

3. Entonces presione F5 para ejecutar este código, y un cuadro de aviso que le permite ingresar su antigua dirección de hipervínculo en el Texto antiguo caja. Ver captura de pantalla:

4. Hacer clic OK, y aparece otro cuadro emergente para recordarle que ingrese la nueva dirección de hipervínculo que desea usar.

5. Y luego haz clic OK, las mismas direcciones de hipervínculo antiguas han sido reemplazadas por la nueva a la vez. Ver capturas de pantalla:


Cambie múltiples rutas de hipervínculos a la vez en una hoja de trabajo / libro de trabajo / múltiples hojas / selección con una característica sorprendente

Si desea reemplazar las rutas de hipervínculo de una selección, varias hojas, workkook actual o varios libros de trabajo, ¿cómo podría hacerlo? Con Buscar y reemplazar característica de Kutools for Excel, puede hacer frente rápidamente a esta tarea.

Nota:Para aplicar esto Buscar y reemplazar utilidad, en primer lugar, debe descargar la Kutools for Excely, a continuación, aplique la función de forma rápida y sencilla.

Después de instalar Kutools for Excel, haz lo siguiente:

1. Hacer clic Kutools > Navegación, ver captura de pantalla:

2. En el abierto Navegación Panel, haga clic Encontrar y reemplazar pestaña, en el Buscar y reemplazar Panel, haga clic Reemplaza pestaña, y luego realice las siguientes operaciones:

  • Ingrese el texto del hipervínculo antiguo que desea encontrar en el Encuentra lo que cuadro de texto y, a continuación, escriba el nuevo texto de hipervínculo que desea reemplazar en el Reemplazar con caja de texto;
  • Especifique el alcance donde desea buscar y reemplazar la ruta del hipervínculo desde el En un radio de la lista desplegable;
  • Luego, seleccione Hipervínculos del menú desplegable Buscar en;
  • Por último, haz clic Encuentra todos , todas las celdas correspondientes que contienen el texto del hipervínculo específico se enumeran en el cuadro de lista inferior.

3. Luego, haz clic reemplazar todo botón, las antiguas rutas de hipervínculo se han cambiado a las nuevas a la vez, vea la captura de pantalla:

¡Haga clic para descargar Kutools for Excel para una prueba gratuita!


Artículos más relativos:

  • Extraer direcciones reales de hipervínculos
  • Supongamos que tiene un rango de celdas que contienen hipervínculos, y ahora necesita ver el destino real de los hipervínculos y extraerlos de los hipervínculos como se muestra a continuación. ¿Hay alguna forma fácil de resolver este problema rápidamente?
  • Convertir URL de imagen en imágenes reales en Excel
  • Si tiene una lista de direcciones URL de imágenes en la columna A, y ahora, desea descargar las imágenes correspondientes de las URL y mostrarlas en la columna B adyacente como se muestra en la captura de pantalla de la izquierda. En Excel, ¿cómo podría extraer las imágenes reales de las URL de las imágenes de forma rápida y sencilla?
  • Convertir texto de URL en hipervínculo en el que se puede hacer clic en Excel
  • Supongamos que tiene varias URL en su hoja de trabajo, pero que no están vinculadas, y ahora necesita convertir todas las URL no vinculadas en hipervínculos en los que se puede hacer clic, como se muestra a continuación. Por supuesto, puede hacer doble clic en ellos uno por uno para que se pueda hacer clic en ellos, pero esto llevará mucho tiempo si hay muchas URL. ¿Cómo podría convertir varias URL no vinculadas en hipervínculos en los que se puede hacer clic automáticamente en Excel?

Las mejores herramientas de productividad de oficina

Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%

  • Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
  • Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
  • Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
  • Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
  • Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
  • Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
  • Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
  • Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
  • Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.
pestaña kte 201905

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

  • Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
  • Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
  • ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!
officetab parte inferior
Comentarios (45)
Aún no hay calificaciones. ¡Sé el primero en calificar!
Este comentario fue minimizado por el moderador en el sitio
Increíble, me ahorró mucho esfuerzo.
Este comentario fue minimizado por el moderador en el sitio
Me encanta, me ahorras un montón de trabajo.
Este comentario fue minimizado por el moderador en el sitio
Hola, ¿podría darme el código VB si necesito cambiar los enlaces en Powerpoint en lugar de Excel? Gracias
Este comentario fue minimizado por el moderador en el sitio
Hola, esto parece funcionar muy bien, pero algunos caracteres (por ejemplo, "\" y "%"). En mi caso tengo direcciones de hipervínculos como [../../../../../../Application%20Data/Microsoft/2012/Relacom%20Uki-Kantvik-Tallinna-Pietari-Uki_saate151012.xls] y Necesito obtener el inicio [../../../../../../Application%20Data/Microsoft/] lejos de la dirección de cientos de enlaces. El comienzo de los enlaces es el mismo, pero los extremos son diferentes. ¿Tienes algún buen consejo?
Este comentario fue minimizado por el moderador en el sitio
¡¡¡¡Gracias!!!! :lol: eso ayudó mucho.
Este comentario fue minimizado por el moderador en el sitio
¿Cómo cambiaría esto para actualizar los hipervínculos que se vinculan a referencias dentro de un libro de trabajo en lugar de direcciones web externas?
Este comentario fue minimizado por el moderador en el sitio
Solo necesitaba lo mismo, pruebe estos cambios: Sub ReplaceHyperlinks() 'Updateby20140220 Dim Wb As Workbook Dim Ws As Worksheet Dim xHyperlink As Hyperlink Dim xOld As String, xNew As String xTitleId = "CambiaLink" 'Set Ws = Application.ActiveSheet Set Wb = Application.ActiveWorkbook xOld = Application.InputBox("Texto antiguo:", xTitleId, "", Tipo:=2) xNew = Application.InputBox("Nuevo texto:", xTitleId, "", Tipo:=2) Para cada Ws En Wb.Worksheets 'Application.ScreenUpdating = False For Each xHyperlink In Ws.Hyperlinks Debug.Print ("voy " & xHyperlink.SubAddress) xHyperlink.SubAddress = Replace(xHyperlink.SubAddress, xOld, xNew) Next Next Application.ScreenUpdating = True Finalizar sub
Este comentario fue minimizado por el moderador en el sitio
mauricio-eres genial! ¡Gracias! Además, para otro informe, lo necesitaré para actualizar los enlaces solo en pestañas específicas, ¿es eso posible?
Este comentario fue minimizado por el moderador en el sitio
Gracias gracias gracias !!!!!!! me salvaste 2 dias de trabajo aqui
Este comentario fue minimizado por el moderador en el sitio
¿Hay alguna manera de cambiar varios hipervínculos "texto para mostrar" al mismo tiempo?
Este comentario fue minimizado por el moderador en el sitio
Gracias por una brillante pieza de programa. Funciona COMO un ENCANTO..."WLC"
Este comentario fue minimizado por el moderador en el sitio
¡Brillante! ¡¡¡¡Muchas gracias!!!!
Este comentario fue minimizado por el moderador en el sitio
Hola chicos, ¿qué me estoy perdiendo? Obtengo 'Error de compilación - Variable no definida' para el XTitleId en Excel 2013: llorar:
Este comentario fue minimizado por el moderador en el sitio
No te preocupes, lo descubrí y lo configuré como una cadena.
Este comentario fue minimizado por el moderador en el sitio
me sirvio de mucha ayuda muchas gracias
Este comentario fue minimizado por el moderador en el sitio
Este es el artículo de Excel más útil que he encontrado. He tenido muchos problemas cuando los hipervínculos dentro de un archivo se corrompen, o quiero mover la ubicación de algunos archivos con hipervínculos, y la actualización siempre ha sido un problema importante. Mi programador de Excel no tenía una solución simple. Esto funciona sin fallas. Estoy muy agradecido, ¡gracias!
Este comentario fue minimizado por el moderador en el sitio
¡Guau! Esto me ahorró MUCHO TIEMPO. Eres increíble. ¡Gracias por compartir!
Este comentario fue minimizado por el moderador en el sitio
Esto es brillante. Me ahorraste TANTO.TIEMPO. hoy dia. ¡Gracias por compartir!
Este comentario fue minimizado por el moderador en el sitio
¡Muchas gracias por desarrollar esto! Tuve un usuario que creó un montón de hipervínculos en varias pestañas (al menos varios cientos) y de alguna manera tenían una ruta de archivo a su carpeta AppData\Roaming en su unidad c en lugar de a la carpeta de red. Pude usar su secuencia de comandos VBA para eliminar esa parte del código del enlace y ahora todo funciona. ¡Probablemente nos ahorró una semana de actualización y me tomó menos de 2 minutos implementarlo!
Este comentario fue minimizado por el moderador en el sitio
Increíble. Funcionó de maravilla en Excel 2013, no se requieren ajustes, a diferencia de soluciones similares que he visto para este problema. MUCHAS GRACIAS. Ahorró un dolor de cabeza masivo y horas de tiempo.
Este comentario fue minimizado por el moderador en el sitio
Intenté ejecutarlo en hipervínculos que contienen referencias a otras carpetas, pero no funcionó. ¿Cómo cambiaría esto para actualizar los hipervínculos que se vinculan a carpetas dentro de un disco duro en lugar de direcciones web externas?
No hay comentarios publicados aquí todavía
Ver más
Deje sus comentarios
Publicar como invitado
×
Califica esta publicación:
0   Personajes
Ubicaciones sugeridas

Seguinos

Copyright © 2009 - www.extendoffice.com. | Reservados todos los derechos. Energizado por ExtendOffice, | Mapa del Sitio
Microsoft y el logotipo de Office son marcas comerciales o marcas comerciales registradas de Microsoft Corporation en los Estados Unidos y / o en otros países.
Protegido por Sectigo SSL