{"id":16231,"date":"2021-07-28T00:09:27","date_gmt":"2021-07-28T05:09:27","guid":{"rendered":"https:\/\/www.perucontable.com\/excelcontable\/?p=16231"},"modified":"2023-11-14T22:07:14","modified_gmt":"2023-11-15T03:07:14","slug":"macro-para-contar-celdas-con-datos","status":"publish","type":"post","link":"https:\/\/www.perucontable.com\/excelcontable\/macro-para-contar-celdas-con-datos\/","title":{"rendered":"MACRO PARA CONTAR CELDAS CON DATOS"},"content":{"rendered":"
\n
\"\"<\/figure><\/div>\n\n\n

Si trabajas con hojas de c\u00e1lculos, es obvio que necesitar\u00e1s contar las celdas que contengan datos, este puede ser un proceso molesto al hacerlo de forma manual, as\u00ed que crear un macro con VBA en Excel para contar celdas, <\/strong>es posible.<\/strong><\/p>\n\n\n\n

Cuando trabajamos con macros en Excel y dependemos de que el usuario ingrese valores en algunas celdas de nuestra hoja, es com\u00fan vernos en la necesidad de contar las celdas con datos<\/strong> de manera que podamos hacer las validaciones pertinentes. En esta ocasi\u00f3n te mostrar\u00e9 un par de  alternativas que tenemos para realizar ese tipo de cuenta desde VBA.<\/p>\n\n\n\n

Para realizar el primer ejemplo de este art\u00edculo utilizar\u00e9 los datos capturados en el rango A1:C10 y adem\u00e1s necesitar\u00e9 algunos botones de comando ActiveX que insertar\u00e9 desde la ficha Programador y que ser\u00e1n los encargados de ejecutar el c\u00f3digo VBA desde su evento click.<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

LA PROPIEDAD COUNT<\/strong><\/h2>\n\n\n\n

Para nuestro primer ejemplo utilizar\u00e9 el objeto Range<\/em> y una de sus propiedades conocida como Count<\/em> que nos indicar\u00e1 la cantidad exacta de celdas que conforman el rango indicado. Considera el siguiente c\u00f3digo VBA:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

El c\u00f3digo ha sido insertado en el evento Click<\/em> del bot\u00f3n de comando y mostrar\u00e1 un cuadro de di\u00e1logo con la cantidad de celdas del rango. As\u00ed que, al pulsar el bot\u00f3n obtendr\u00e9 el siguiente resultado:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Es importante recordar que la propiedad Count<\/em> funcionar\u00e1 correctamente mientras el rango no exceda de 2,147,483,647 de celdas. Si necesitas contar una cantidad mayor de celdas, entonces ser\u00e1 necesario utilizar la propiedad CountLarge<\/em>.<\/p>\n\n\n\n

Con este c\u00f3digo hemos logrado contar la totalidad de celdas dentro de un rango espec\u00edfico, pero para poder contar las celdas con datos<\/strong> tenemos que restar aquellas celdas que est\u00e1n vac\u00edas y eso ser\u00e1 precisamente lo que haremos en la siguiente secci\u00f3n.<\/p>\n\n\n\n

EL M\u00c9TODO SPECIALCELLS<\/strong><\/h2>\n\n\n\n

Una manera de conocer las celdas que est\u00e1n vac\u00edas es utilizar el objeto Range<\/em> y su m\u00e9todo SpecialCells<\/em> el cual recibe un par\u00e1metro para indicar el tipo de celdas que deseamos obtener. Un posible valor para dicho par\u00e1metro es xlCellTypeBlanks<\/em> que simboliza las celdas en blanco, as\u00ed que podemos utilizar el siguiente c\u00f3digo VBA:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Al ejecutar este c\u00f3digo obtendremos un resultado como el siguiente:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Ahora ya conoces el funcionamiento de la propiedad Count<\/em> y del m\u00e9todo SpecialCells<\/em> as\u00ed que podremos crear f\u00e1cilmente una macro para contar las celdas con datos<\/strong>.<\/p>\n\n\n\n

MACRO PARA CONTAR CELDAS CON DATOS<\/strong><\/h2>\n\n\n\n

Para poder contar las celdas que contienen datos dentro de un rango espec\u00edfico podemos restar las celdas en blanco del total de las celdas del rango. Eso lo podemos lograr con el siguiente c\u00f3digo:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

Observa que no he introducido ninguna instrucci\u00f3n nueva sino que solamente he utilizado la propiedad Count<\/em> para obtener el total de celdas y posteriormente he restado las celdas vac\u00edas con el m\u00e9todo SpecialCells<\/em>. Al ejecutar este c\u00f3digo obtenemos el siguiente resultado:<\/p>\n\n\n

\n
\"\"<\/figure><\/div>\n\n\n

El rango A1:C10 est\u00e1 formado por 30 celdas, de las cuales 5 est\u00e1n vac\u00edas, as\u00ed que solo existen 25 celdas con datos por lo que el resultado de nuestra macro es correcto.<\/p>\n\n\n\n

M\u00c1S SOBRE EL M\u00c9TODO SPECIALCELLS<\/strong><\/h2>\n\n\n\n

En este primer ejemplo he utilizado el m\u00e9todo SpecialCells<\/em> para contar las celdas en blanco de un rango pero es posible utilizar dicho m\u00e9todo para contar celdas con ciertos tipos de dato especiales, como las celdas que contienen f\u00f3rmulas o las celdas que tienen comentarios. Lo \u00fanico que debes hacer es indicar el valor adecuado como su par\u00e1metro:<\/p>\n\n\n\n