Ynhâldsopjefte
Yn Microsoft Excel is wurkjen mei sifers it meast foarkommen. Soms moatte wy in dataset ferwurkje mei grutte hoemannichten nûmers. Mar jo kinne josels yn in situaasje fine wêr't jo nûmers lykje op tekst. Om dizze reden kinne jo net tafoegje, subtractearje, diele, fermannichfâldigje of elke soart operaasje útfiere. It toant altyd in flater as jo besykje dit te dwaan. Yn dizze tutorial sille wy jo leare hoe't jo tekst konvertearje nei nûmer yn Excel mei VBA -koades mei passende foarbylden en juste yllustraasjes.
Oefenwurkboek downloade
Download dizze praktyk wurkboek
Tekst konvertearje nei nûmers mei VBA.xlsm
Hoe kinne nûmers identifisearje opmakke as tekst
Microsoft Excel is tûk genôch om it ferskil tusken tekst en nûmer te begripen. It konvertearret se automatysk nei har respektive formaten. Mar soms kin it dat net dwaan fanwegen wat misbrûk en ferkearde ynterpretaasjes fan 'e dataset. Om dy reden hâldt it dy nûmers as teksten yn jo wurkboek.
Besjoch dizze dataset. Hjir hawwe wy wat nûmers yn in kolom.
Hoewol't wy nûmers yn 'e kolom hawwe, binne se allegear linksôfstimd lykas de tekst. Klikje no op elke sel. Jo sille dit fak njonken de sel fine.
Hou no mei de mûsoanwizer oer it fak. Dêrnei sille jo dit berjocht sjen.
It lit sjen dat de sel opmakke is as tekst. Op dizze manier kinne jo der wis fan wêzeoft de sellen as tekst opmakke binne of net.
3 VBA-koades om tekst nei nûmer te konvertearjen yn Excel
Hoewol jo tekst maklik hânmjittich omsette kinne nei nûmers, giet dit tutorial oer it konvertearjen fan tekst nei nûmer mei help fan VBA koades. Wy riede oan dat jo al dizze metoaden leare en tapasse op jo dataset. Wis, it sil yn in protte situaasjes fan pas komme.
1. VBA-koade mei Range.NumberFormat Metoade om tekst nei nûmer yn Excel te konvertearjen
Dizze metoade is frij ienfâldich en maklik te brûken op elke dataset. Alles wat jo hoege te dwaan is it berik fan sellen te selektearjen en it yn te foegjen yn de VBA-koade .
📌 Stappen
1. Druk earst op ALT+F11 op jo toetseboerd om de VBA-bewurker te iepenjen.
2. Klik op Ynfoegje > Module .
3. Typ dan de folgjende koade:
9488
4. Bewarje de triem.
5. Druk dan op ALT+F8 . It sil it dialoochfinster Makro iepenje.
6. Selektearje ConvertTextToNumber en klikje op Utfiere.
Op it lêst sil dizze koade ús tekst konvertearje nei nûmers.
Lês mear: Hoe konvertearje string nei nûmer yn Excel VBA
2. VBA-koade mei Loop en CSng om de tekst nei nûmer te konvertearjen
Yn dizze metoade brûke wy Loop en CSng funksjes. De funksje CSng nimt yn prinsipe elke tekst as argumint en konvertearret it nei ien getal. Us loop sil gean troch elke sel fande selektearre kolom. Dêrnei sille wy de wearde fan elke sel trochjaan oan CSng funksje om it fan tekst nei nûmer te konvertearjen.
📌 Stappen
1. Druk earst op ALT+F11 op jo toetseboerd om de VBA-bewurker te iepenjen.
2. Klik op Ynfoegje > Module .
3. Typ dan de folgjende koade:
2990
4. Bewarje de triem.
5. Druk dan op ALT+F8 . It sil it dialoochfinster Makro iepenje.
6. Selektearje ConvertUsingLoop en klikje op Utfiere.
Sa't jo sjen kinne, hawwe wy ús tekst omsetten nei nûmers mei dizze VBA-koade .
Gelykbere lêzings
- Bulk konvertearje tekst nei nûmer yn Excel (6 manieren)
- Hoe kinne jo string konvertearje nei lang mei VBA yn Excel (3 manieren)
- String konvertearje nei dûbel yn Excel VBA (5 metoaden)
- Hoe om konvertearje nei nûmerflater yn Excel te reparearjen (6 metoaden)
3. Konvertearje tekst nei nûmers foar dynamyske berik yn Excel
No wiene eardere metoaden foar de selektearre berikken . Dat betsjut dat jo jo berik fan sellen manuell moatte ynfiere yn 'e koade. Mar soms kin jo dataset grut wêze. Yn dy gefallen moatte jo it berik fan sellen ûnthâlde. Dizze metoade sil dat probleem oerwinne. Wy witte dat ús dataset begjint fan Sel B5 . Mar wy witte net wêr't it kin einigje.
Sa identifisearje wy dynamysk de lêste brûkte excel-rige dy't gegevens yn hat mei Cells(Rows.Count, "B").End(xlUp).Row
. Itjout it lêste net-lege rigenûmer werom dat wy ferbine mei " B5:B ".
📌 Stappen
1. Druk earst op ALT+F11 op jo toetseboerd om de VBA-bewurker te iepenjen.
2. Klik op Ynfoegje > Module .
3. Typ dan de folgjende koade:
6166
4. Bewarje de triem.
5. Druk dan op ALT+F8 . It sil it dialoochfinster Makro iepenje.
6. Selektearje dan ConvertDynamicRanges en klikje op Utfiere.
Sa't jo sjen kinne, binne wy suksesfol yn it konvertearjen fan tekst nei nûmers mei de VBA-koades.
💬 Dingen om te ûnthâlden
✎ Hjir brûke wy kolom B foar ús dataset. As jo gegevens yn in oare kolom steane, feroarje dan it berik fan sellen yn VBA-koades neffens.
✎ De VBA-koades wurkje allinich op it aktive blêd.
Konklúzje
Ta beslút hoopje ik dat dit tutorial jo in stik nuttige kennis hat levere oer it konvertearjen fan tekst nei nûmer yn Excel mei VBA-koades. Wy riede oan dat jo al dizze ynstruksjes leare en tapasse op jo dataset. Download it oefenwurkboek en besykje dizze sels. Fiel jo ek frij om feedback te jaan yn 'e kommentaardiel. Jo weardefolle feedback hâldt ús motivearre om tutorials lykas dit te meitsjen. Ferjit net om ús webside Exceldemy.com te kontrolearjen foar ferskate Excel-relatearre problemen en oplossingen.