Resaltar celdas involucradas en el resultado de una fórmula
El caso: Se tiene como resultado de la fórmula SUMAR.SI.CONJUNTO(Tabla11[Pendiente de Pago];Tabla11[Quien];F5).
La Celda F5 es el resultado de la validación de datos INDIRECTO("tabla11[quien]") (y aquí mi primera tranca: "modificar esa fórmula INDIRECTO para obtener datos de la columna QUIEN con valores únicos"). (Lo puedo resolver generando una nueva lista con valores únicos en otro segmento de la hoja, pero si quiero avanzar y aprender más necesito ideas de cómo hacer lo mismo modificando la formula de la validación)
Se requiere que resalte las celdas de la columna PENDIENTE DE PAGO que dieron como resultado a la consulta, como muestra la segunda imagen, ya sea esto cambiando el fondo de las celdas o más hermoso aún generando un POP-UP con el extracto de los datos involucrados en la consulta.
Sin más que decir y esperando haya sido clara esta descripción les felicito sinceramente porque he aprendido mucho de ustedes.
1 Respuesta
Pon la siguiente macro en los eventos de tu hoja
Private Sub Worksheet_Change(ByVal Target As Range)
'Por Dante Amor
'Resalte las celdas de la columna PENDIENTE DE PAGO
'que dieron como resultado a la consulta
'
If Not Intersect(Target, Range("F5")) Is Nothing Then
If Target.Count > 1 Then Exit Sub
Range("Tabla11[Pendiente de Pago]").Interior.ColorIndex = xlNone
For Each quien In Range("Tabla11[Quien]")
dato = quien.Value
If quien.Value = Target.Value Then
Cells(quien.Row, "A").Interior.ColorIndex = 6
End If
Next
End If
End SubSigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
- En el panel del lado derecho copia la macro
Funciona de esta forma, cada que cambies el nombre en la celda F5, se pintarán las celdas de la columna "Pendiente de pago".
Nota: Solamente funciona para la condición que la columna "Quien" sea igual al nombre que pusiste en la celda F5. Si agregas más condiciones a tu fórmula es preciso modificar la macro.
'.[Sal u dos. Dante Amor. No olvides valorar la respuesta.
