
¿Es posible en Excel vincular dos celdas (en diferentes libros) para que un cambio en cualquiera de ellas se refleje en la otra celda?
La vinculación unidireccional mediante la cual una celda es una vista del valor en la otra celda es fácil. Busco un enlace bidireccional para que un usuario pueda actualizar cualquiera de las celdas y tener el valor reflejado en la otra.
Respuesta1
No es posible cruzar libros, pero sí hacerlo entre hojas de trabajo en el mismo libro:
para este sub privado, haga clic derecho en el botón Excel y presioneview code
Private Sub Workbook_TwoWayMatch(ByVal Sh As Object, ByVal Target As Range)
If UCase(Sh.Name) = "sheet1" Or UCase(Sh.Name) = "sheet2" Then
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
Application.EnableEvents = False
If UCase(Target.Parent.Name) = "SHEET1" Then
Sheets("Sheet2").Range("A1") = Target
Else
Sheets("Sheet1").Range("A1") = Target
End If
Application.EnableEvents = True
End If
End If
End Sub