Sumatoria con base en dos columnas
Hola, tengo una hoja en excel con dos columnas con códigos, en una
tercera columna hay un valor. Necesito hacer una macro que lea las dos
primeras columnas y dependiendo de los códigos que encuentre lleve una
sumatoria en otra Hoja. Por Ejemplo:
Col1 Col2 Col3
AP 1 2000
AP 1 2800
BD 2 3000
AP 1 1500
AP 3 2300
Para
este ejemplo, al final tendría una sumatoria para "AP-1", otra para BD-2 y una tercera
para BD2. Debe comenzar a leer el archivo desde la fila 1 y llegar hasta
el final de la hoja.
1 Respuesta
Tu problema se soluciona con una tabla dinámica.
Te he mandado un ejemplo por mail
Recuerda finalizar y puntuar
Hola Luis agradezco tu respuesta, la solución de la tabla dinámica ya la sabia. La respuesta que necesito es en una macro. Son ejercicios de un curso que estoy realizando.
Saludos
Pues aquí tienes:
Escribimos tus datos ocupando el rango A1:C6, siendo la primera fila el encabezado
Después solo tienes que ejecutar esta macro para que haga las sumas y las pegue en la hoja2.
Sub prueba()
Range("a2").Select
Do While ActiveCell.Value <>""
If ActiveCell.Value = "AP" And ActiveCell.Offset(0, 1).Value = 1 Then
suma1 = suma1 + ActiveCell.Offset(0, 2).Value
ElseIf ActiveCell.Value = "AP" And ActiveCell.Offset(0, 1).Value = 3 Then
suma2 = suma2 + ActiveCell.Offset(0, 2).Value
ElseIf ActiveCell.Value = "BD" And ActiveCell.Offset(0, 1).Value = 2 Then
suma3 = suma3 + ActiveCell.Offset(0, 2).Value
End If
ActiveCell.Offset(1, 0).Select
Loop
Sheets("hoja2").Select
Cells(1, 5).Value = "la suma de AP1 es de" & suma1
Cells(2, 5).Value = "la suma de AP3 es de" & suma2
Cells(3, 5).Value = "la suma de BD2 es de" & suma3
End Sub
