¿Es posible relacionar dos celdas editables?
Hola,
Mi consulta radica en poder editar valores en diferentes celdas y que estas se cambien automáticamente, es decir poder editar un valor en una celdo o la otra indiferentemente. Pensado en una planilla de gastos general y en otra hoja las planillas con el detalle de cada categoría, o para la programación de una proyección de sueldos donde se pueda tener una hoja por cada proyecto y una general donde se resuman todos los proyectos para cada persona.
Sé que se puede hacer con referencias a una base de datos SQL, pero ya no sería en excel y tendría que entrar a hacer un programa para el despliegue y edición de los datos.
Muchas Gracias,
Mi consulta radica en poder editar valores en diferentes celdas y que estas se cambien automáticamente, es decir poder editar un valor en una celdo o la otra indiferentemente. Pensado en una planilla de gastos general y en otra hoja las planillas con el detalle de cada categoría, o para la programación de una proyección de sueldos donde se pueda tener una hoja por cada proyecto y una general donde se resuman todos los proyectos para cada persona.
Sé que se puede hacer con referencias a una base de datos SQL, pero ya no sería en excel y tendría que entrar a hacer un programa para el despliegue y edición de los datos.
Muchas Gracias,
1 Respuesta
Respuesta de Hector Pacheco
1
Esto no se puede hacer directamente en la hoja porque se crearía bucle cíclico infinito, pero si se puede hacer con un sencillo Macro y el edito VB:
En el código de la Hoja1 colcas esto
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("b2") Then
Worksheets("Hoja2").Range("b2").Value = Range("b2").Value
End If
End Sub
En el codigo de la Hoja2 colocas esto
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("b2") Then
Worksheets("Hoja1").Range("b2").Value = Range("b2").Value
End If
End Sub
Con eso queda resuelto tu problema y aqui te dejo un sencillo ejemplo: http://www.4shared.com/document/BGzrfaz6/Celdas_Conectadas.html
En el código de la Hoja1 colcas esto
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("b2") Then
Worksheets("Hoja2").Range("b2").Value = Range("b2").Value
End If
End Sub
En el codigo de la Hoja2 colocas esto
Private Sub Worksheet_Change(ByVal Target As Range)
If Target = Range("b2") Then
Worksheets("Hoja1").Range("b2").Value = Range("b2").Value
End If
End Sub
Con eso queda resuelto tu problema y aqui te dejo un sencillo ejemplo: http://www.4shared.com/document/BGzrfaz6/Celdas_Conectadas.html
Hola,
Excelente, Muchas Gracias.
Para pocas celdas sirve mucho al igual que para contiguas cambiando el rango, pero para muchas celdas separadas puede ser un gran problema, especialmente para llevar el control de cambios.
Muchas Gracias, el ejemplo está clarísimo y funciona perfecto.
Excelente, Muchas Gracias.
Para pocas celdas sirve mucho al igual que para contiguas cambiando el rango, pero para muchas celdas separadas puede ser un gran problema, especialmente para llevar el control de cambios.
Muchas Gracias, el ejemplo está clarísimo y funciona perfecto.
