Quan teniu una petita taula de dades amb unes quantes columnes, podeu comptar-les totes fàcilment. Però per a una taula de dades gran, és bastant difícil comptar totes les columnes sense cap error. A més d'això, algunes columnes poden contenir dades, mentre que algunes columnes poden estar completament en blanc. Així, comptar totes les columnes amb dades en cas d'una taula de dades gran és bastant difícil. En aquest article, aprendràs dues maneres de comptar columnes amb dades mitjançant VBA a Excel amb facilitat.

Descarregar el quadern de pràctiques

Podeu baixar el fitxer d'Excel des de l'enllaç següent i practicar juntament amb it.

Comptar columnes amb Data.xlsm

2 maneres de comptar columnes amb dades mitjançant VBA a Excel

1 Compteu totes les columnes d'un full de treball amb dades mitjançant un codi VBA simple

Podem veure les 3 columnes a la taula de dades següent. Ara utilitzarem un codi VBA per determinar el nombre de columnes utilitzades en un sol full de treball d'Excel.

❶ Primer de tot, premeu ALT + F11 per obrir l'editor VBA.

❷ Després d'això, creeu un mòdul nou des de Insereix > Mòdul.

❸ Després copieu el següent script VBA.

9026

❹ Després torneu a l'editor VBA i premeu CTRL + V per enganxar-lo.

❺ Ara deseu el codi VBA prement el botó CTRL + S .

❻ Per executar el codi VBA,  aneu a la pestanya Desenvolupador i feu clic a Macros . O, simplement, premeu F5Tecla .

Apareixerà el quadre de diàleg Macro .

❼ Tot el que heu de fer és fer clic al botó Executar .

Ara veureu que ha aparegut un quadre de diàleg. El que diu que el nombre de columnes amb dades és 3.

Llegeix més: Com comptar el nombre de columnes a Excel (3 fàcils). Mètodes)

2. Compteu totes les columnes d'un rang determinat amb dades mitjançant un codi VBA d'Excel

El codi VBA següent us permetrà comptar totes les columnes amb dades en un interval donat.

Per utilitzar el codi,

❶ En primer lloc, obriu l'editor VBA prement ALT + F11.

❷ A continuació, aneu a Insereix > Mòdul per crear un mòdul nou.

❸ Després copieu el següent script VBA.

7598

❹ Torneu a l'editor de VBA i premeu CTRL + V per enganxar-lo.

❺ Ara deseu el codi prement CTRL + S.

❻ Aneu a la pestanya Desenvolupador i premeu la Macros per obrir la finestra Macro .

O simplement premeu el Tecla F5 per utilitzar el quadre de diàleg Macro .

❼ Des del quadre de diàleg, trieu el nom de la funció CountColumnsInARange i premeu Executar botó.

Finalment, apareixerà un petit quadre de diàleg que diu que el nombre total de columnes és 3.

Més informació: Com comptar columnes per a VLOOKUP a Excel (2 mètodes)

Més codis VBA per comptar columnes a Excel

1. ÚsMètode VBA Range.End per retornar l'últim número de columna utilitzada

Per obtenir l'últim número de columna utilitzat en un full de càlcul d'Excel,

❶ En primer lloc, obriu l'editor VBA prement ALT + F11.

❷ A continuació, aneu a Insereix > Mòdul per crear un mòdul nou.

❸ Copieu el codi VBA següent:

7981

❹ Enganxeu i deseu el codi a l'editor VBA.

❺ Premeu la tecla F5 per executar el codi anterior.

Obtràs l'última columna número en un quadre de diàleg emergent com a la imatge següent:

Llegir més: Com comptar les columnes fins que s'arribi al valor a Excel

2. Utilitzeu el mètode Range.Find per retornar l'últim número de columna utilitzada a Excel

Si busqueu codis VBA per retornar l'últim número de columna utilitzat, seguiu els passos següents :

❶ En primer lloc, premeu ALT + F11 per obrir l'editor VBA.

❷ Després d'això, creeu un mòdul nou des de Insereix > Mòdul.

❸ Copieu el següent codi VBA:

3245

❹ Després torneu a l'editor VBA i premeu CTRL + V per enganxar-lo.

❺ Ara deseu el codi VBA prement el botó CTRL + S .

Ara, premeu la tecla F5 per executar el codi anterior.

Obtràs l'últim número de columna utilitzada en un quadre de diàleg emergent com a la imatge següent:

Coses per recordar

• Premeu ALT + F11 per obrir l'editor de VBA.
• Podeu prémer ALT +F8 per utilitzar el quadre de diàleg Macros .
• Per executar el codi VBA, premeu F5.

Conclusió

En resum, hem parlat de 2 maneres de comptar columnes amb dades mitjançant VBA a Excel. Us recomanem que baixeu el quadern de pràctiques adjunt juntament amb aquest article i practiqueu tots els mètodes amb això. I no dubteu a fer qualsevol pregunta a la secció de comentaris a continuació. Intentarem respondre a totes les consultes pertinents el més aviat possible. I si us plau, visiteu el nostre lloc web ExcelWIKI per explorar-ne més.