Ynhâldsopjefte
As jo in lytse gegevenstabel hawwe mei in pear kolommen, kinne jo se allegear maklik telle. Mar foar in grutte gegevenstabel is it frij lestich om alle kolommen sûnder flater te tellen. Derneist kinne guon kolommen gegevens befetsje, wylst guon kolommen folslein leech binne. Sa is it tellen fan alle kolommen mei gegevens yn gefal fan in grutte gegevenstabel frij dreech. Yn dit artikel sille jo 2 manieren leare om kolommen mei gegevens te tellen mei VBA yn Excel mei gemak.
Oefenwurkboek downloade
Jo kinne it Excel-bestân downloade fan 'e folgjende keppeling en oefenje tegearre mei it.
Telle kolommen mei Data.xlsm
2 manieren om kolommen te tellen mei gegevens mei VBA yn Excel
1 Telle alle kolommen yn in wurkblêd mei gegevens mei in ienfâldige VBA-koade
Wy kinne de 3 kolommen sjen yn 'e folgjende gegevenstabel. No sille wy in VBA-koade brûke om it oantal brûkte kolommen yn ien Excel-wurkblêd te bepalen.
❶ Druk earst op ALT + F11 om de VBA-bewurker te iepenjen.
❷ Dêrnei meitsje in nije module fan Ynfoegje > Module.
❸ Kopiearje dêrnei it folgjende VBA-skript.
7545
❹ Gean dan werom nei de VBA-bewurker en druk op CTRL + V om it te plakjen.
❺ Bewarje no de VBA-koade troch op de CTRL + S knop te drukken.
❻ Om de VBA-koade út te fieren, gean jo nei it ljepblêd ûntwikkelder en klikje op Makro's . Of druk gewoan op de F5 kaai.
It dialoochfinster Makro sil ferskine.
❼ Alles wat jo hoege te dwaan is te klikken op de knop Utfiere .
No sille jo sjen dat in dialoochfinster ferskynde. Wat seit, it oantal kolommen mei gegevens is 3.
Lês mear: How to Count Number of Columns in Excel (3 Easy Metoaden)
2. Telle alle kolommen yn in opjûn berik mei gegevens mei help fan in Excel VBA-koade
De folgjende VBA-koade sil jo ynskeakelje om alle kolommen mei gegevens te tellen yn in opjûn berik.
Om de koade te brûken,
❶ Iepenje earst de VBA-bewurker troch op ALT + F11 te drukken.
❷ Gean dan oan Ynfoegje & GT; Module om in nije module oan te meitsjen.
❸ Kopiearje dêrnei it folgjende VBA-skript.
1120
❹ Gean werom nei de VBA-bewurker en druk op CTRL + V om it te plakken.
❺ Bewarje no de koade troch op CTRL + S.
Of druk gewoan op de F5 kaai om it dialoochfinster Makro te brûken.
❼ Kies yn it dialoochfinster de funksjenamme CountColumnsInARange en druk op Utfiere knop.
Uteinlik sil der in lyts dialoochfinster ferskine dat seit dat it totale oantal kolommen 3 is.
Lês mear: Hoe kinne jo kolommen telle foar VLOOKUP yn Excel (2 metoaden)
Mear VBA-koades om kolommen te tellen yn Excel
1. BrûkeVBA Range.End-metoade om it lêst brûkte kolomnûmer werom te jaan
Om it lêst brûkte kolomnûmer yn in Excel-spreadsheet te krijen,
❶ Iepenje earst de VBA-bewurker troch te drukken op ALT + F11.
❷ Gean dan nei Ynfoegje > Module om in nije module oan te meitsjen.
❸ Kopiearje de folgjende VBA -koade:
2716
❹ Plak en bewarje de koade yn de VBA-bewurker.
❺ Druk op de F5 toets om de boppesteande koade út te fieren.
Jo krije de lêste kolom nûmer yn in pop-up dialoochfinster lykas yn 'e ôfbylding hjirûnder:
Lês mear: Hoe kinne jo kolommen telle oant wearde is berikt yn Excel
2. Brûk Range.Find Metoade om it lêst brûkte kolomnûmer werom te jaan yn Excel
As jo nei VBA-koades sykje om it lêste brûkte kolomnûmer werom te jaan, folgje dan de stappen hjirûnder :
❶ Druk earst op ALT + F11 om de VBA-bewurker te iepenjen.
❷ Dêrnei meitsje in nije module fan Ynfoegje > Module.
❸ Kopiearje de folgjende VBA-koade:
4929
❹ Gean dan werom nei de VBA-bewurker en druk op CTRL + V om it te plakjen.
❺ Bewarje no de VBA-koade troch op de CTRL + S knop te drukken.
Druk no op de F5 kaai om de boppesteande koade út te fieren.
Jo krije it lêst brûkte kolomnûmer yn in pop-up dialoochfinster lykas yn de ôfbylding hjirûnder:
Dingen om te ûnthâlden
- Druk op ALT + F11 om de VBA-bewurker te iepenjen.
- Jo kinne op ALT + drukke.F8 om it dialoochfinster Makro's te brûken.
- Om de VBA-koade út te fieren, druk op de F5.
Konklúzje
Om gear te nimmen, hawwe wy 2 manieren besprutsen om kolommen te tellen mei gegevens mei VBA yn Excel. Jo wurde oanrikkemandearre om it oefenwurkboek te downloaden tegearre mei dit artikel en alle metoaden dêrmei te oefenjen. En aarzelje net om fragen te stellen yn 'e kommentaar seksje hjirûnder. Wy sille besykje sa gau mooglik te reagearjen op alle relevante fragen. En besykje asjebleaft ús webside ExcelWIKI om mear te ferkennen.
