Filtrado columnas y totales
Buenas tardes
Solicito de su ayuda para resolver el siguiente problema que nos dejo el maestro para derecho a examen (que gacho verdad)
Tengo un archivo de Excel en el cual tengo que hacer un filtrado por palabras y año, eso ya lo resolví con una macro (pero se aceptan sugeriancias), en lo que estoy atorado es que después de que se hace el filtrado tengo que contar cuantos registros son y ese valor tiene que ponerse en un celda y columna especificas
por ejemplo estos son los datos
Año Modelo
2006 350 TOURING T/M
2008 ALTIMA COUPE 3.5
2008 ALTIMA COUPE 3.5
2008 ALTIMA COUPE 3.5
2009 ALTIMA COUPE 3.5L
2009 ALTIMA S 2.5 CVT
2009 ALTIMA S 2.5 CVT
2008 APRIO BASE T/A
2008 APRIO BASE T/A
2008 APRIO BASE T/A
2009 APRIO CUSTOM T/A
2009 TSURU GSI T/M 5
2008 TSURU GSI T/M 5
2007 TSURU GSI T/M 5
2009 TSURU GSI T/M 5
2009 TSURU GSII T/A
2008 TSURU GSII T/M
2008 TSURU GSII T/M
Como se aprecia hay varios modelos de altima, aprio Tsuru GSI y Tsuru GSII y de diferentes años
1.- Se tiene que filtra por modelo y año (que eso ya lo tengo en una macro, pero se aceptan sugerencia)
2.- Se tienen que contar los registros filtrados, Eso total debe de caer en la fila columna correspondientes es decir
Numero de unidades por año
2006200720082009
3501
Altima33
Aprio3 1
GSI112
GSII21
Estos datos son variables ya que la cantidad de modeloes puede aumentar o disminuir por lo que se debe de actualizar la informo de manera automática con cualquier cambio
De nueva cuenta gracias por todo
Solicito de su ayuda para resolver el siguiente problema que nos dejo el maestro para derecho a examen (que gacho verdad)
Tengo un archivo de Excel en el cual tengo que hacer un filtrado por palabras y año, eso ya lo resolví con una macro (pero se aceptan sugeriancias), en lo que estoy atorado es que después de que se hace el filtrado tengo que contar cuantos registros son y ese valor tiene que ponerse en un celda y columna especificas
por ejemplo estos son los datos
Año Modelo
2006 350 TOURING T/M
2008 ALTIMA COUPE 3.5
2008 ALTIMA COUPE 3.5
2008 ALTIMA COUPE 3.5
2009 ALTIMA COUPE 3.5L
2009 ALTIMA S 2.5 CVT
2009 ALTIMA S 2.5 CVT
2008 APRIO BASE T/A
2008 APRIO BASE T/A
2008 APRIO BASE T/A
2009 APRIO CUSTOM T/A
2009 TSURU GSI T/M 5
2008 TSURU GSI T/M 5
2007 TSURU GSI T/M 5
2009 TSURU GSI T/M 5
2009 TSURU GSII T/A
2008 TSURU GSII T/M
2008 TSURU GSII T/M
Como se aprecia hay varios modelos de altima, aprio Tsuru GSI y Tsuru GSII y de diferentes años
1.- Se tiene que filtra por modelo y año (que eso ya lo tengo en una macro, pero se aceptan sugerencia)
2.- Se tienen que contar los registros filtrados, Eso total debe de caer en la fila columna correspondientes es decir
Numero de unidades por año
2006200720082009
3501
Altima33
Aprio3 1
GSI112
GSII21
Estos datos son variables ya que la cantidad de modeloes puede aumentar o disminuir por lo que se debe de actualizar la informo de manera automática con cualquier cambio
De nueva cuenta gracias por todo
1 Respuesta
Respuesta de caranbis
1
'Pega esto despues de filtrar:
'Seleccionamos el primer encabezado de la tabla, en mi caso es A1
Range("a1").Select
'Ahora contamos las filas visibles y restamos 1, que correspondiente a los encabezados
For Each area In Selection.CurrentRegion.SpecialCells(xlVisible).Areas
RowCount = RowCount + area.Rows.Count
Next
MsgBox RowCount - 1
'Seleccionamos el primer encabezado de la tabla, en mi caso es A1
Range("a1").Select
'Ahora contamos las filas visibles y restamos 1, que correspondiente a los encabezados
For Each area In Selection.CurrentRegion.SpecialCells(xlVisible).Areas
RowCount = RowCount + area.Rows.Count
Next
MsgBox RowCount - 1
