¿Cómo resaltar las celdas vinculadas por hipervínculos en Excel?

Si hay algunos hipervínculos vinculados a la misma hoja de cálculo o libro de trabajo, ahora necesito que la celda de destino del hipervínculo en el que se hace clic se rellene con un color para destacar la celda vinculada; cuando se haga clic en otro hipervínculo, el primero volverá a su estado normal, como se muestra en la siguiente captura de pantalla. ¿Es posible resolver esto en Excel?

Resaltar las celdas vinculadas por hipervínculos con código VBA

Resaltar las celdas vinculadas por hipervínculos con código VBA

Normalmente, no hay una manera directa de resaltar las celdas de destino vinculadas por hipervínculos, pero el siguiente código VBA puede ayudarte, por favor, sigue estos pasos:

1. Haz clic derecho en la pestaña de la hoja en la que deseas resaltar las celdas de destino vinculadas por hipervínculos, luego selecciona Ver código desde el menú contextual, y en la ventana abierta de Microsoft Visual Basic para aplicaciones, copia y pega el siguiente código en el Módulo en blanco:

Código VBA: Resaltar celdas vinculadas por hipervínculos:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
'Updateby Extendoffice
    Dim i As Long
    For i = 1 To ThisWorkbook.Sheets.Count
        Sheets(i).UsedRange.Interior.ColorIndex = -4142
    Next
    ActiveSheet.Cells.Interior.ColorIndex = red
    Selection.Cells.Interior.ColorIndex = 6
End Sub

2. Luego guarda y cierra este código; ahora, cuando hagas clic en una celda de hipervínculo, la celda de destino vinculada se resaltará de inmediato; cuando hagas clic en otro hipervínculo, el primero volverá a su estado normal.