Com convertir text a nombre amb Excel VBA (3 exemples amb macros)

  • Comparteix Això
Hugh West

A Microsoft Excel, el més habitual és treballar amb números. De vegades, hem de processar un conjunt de dades amb grans quantitats de números. Però, és possible que us trobeu en una situació en què els vostres números semblen text. Per aquest motiu, no es pot sumar, restar, dividir, multiplicar ni realitzar cap tipus d'operació. Sempre mostra un error quan intenteu fer això. En aquest tutorial, us ensenyarem com convertir text a nombre a Excel mitjançant codis VBA amb exemples adequats i il·lustracions adequades.

Baixeu el quadern de pràctiques

Descarregueu aquesta pràctica. llibre de treball

Convertir text a números amb VBA.xlsm

Com identificar números formats com a text

Microsoft Excel és intel·ligent suficient per entendre la diferència entre text i nombre. Els converteix automàticament als seus formats respectius. Però, de vegades, no pot fer-ho a causa d'algun mal ús i interpretacions errònies del conjunt de dades. Per aquest motiu, conserva aquests números com a textos al vostre llibre de treball.

Feu una ullada a aquest conjunt de dades. Aquí tenim alguns números en una columna.

Tot i que tenim números a la columna, tots estan alineats a l'esquerra com el text. Ara, feu clic a qualsevol cel·la. Trobareu aquest quadre al costat de la cel·la.

Ara, passeu el cursor del ratolí per sobre del quadre. Després d'això, veureu aquest missatge.

Mostra que la cel·la té el format de text. D'aquesta manera, pots estar segursi les cel·les tenen el format de text o no.

3 codis VBA per convertir text a nombre a Excel

Tot i que podeu convertir fàcilment text a números manualment, aquest tutorial tracta sobre convertir text a número utilitzant codis VBA. Us recomanem que apreneu i apliqueu tots aquests mètodes al vostre conjunt de dades. Segurament, serà útil en moltes situacions.

1. Codi VBA amb Range.NumberFormat Mètode per convertir text a nombre a Excel

Aquest mètode és bastant senzill i fàcil d'utilitzar en qualsevol conjunt de dades. Tot el que heu de fer és seleccionar l'interval de cel·les i inserir-lo al codi VBA .

📌 Passos

1. Primer, premeu ALT+F11 al teclat per obrir l' editor VBA .

2. Feu clic a Insereix > Mòdul .

3. A continuació, escriviu el codi següent:

2900

4. Desa el fitxer.

5. A continuació, premeu ALT+F8 . Obrirà el quadre de diàleg Macro .

6. Seleccioneu ConvertTextToNumber i feu clic a Run.

Al final, aquest codi convertirà el nostre text en números.

Llegiu més: Com convertir una cadena en nombre a Excel VBA

2. Codi VBA amb bucle i CSng per convertir el text en nombre

En aquest mètode, estem utilitzant les funcions Loop i CSng . La funció CSng bàsicament pren qualsevol text com a argument i el converteix en un sol número. El nostre bucle passarà per totes i cadascuna de les cel·les dela columna seleccionada. Després d'això, passarem el valor de cada cel·la a la funció CSng per convertir-lo de text a número.

📌 Passos

1. Primer, premeu ALT+F11 al teclat per obrir l' editor VBA .

2. Feu clic a Insereix > Mòdul .

3. A continuació, escriviu el codi següent:

9233

4. Desa el fitxer.

5. A continuació, premeu ALT+F8 . Obrirà el quadre de diàleg Macro .

6. Seleccioneu ConvertUsingLoop i feu clic a Run.

Com podeu veure, hem convertit el nostre text en números mitjançant aquest codi VBA. .

Lectures similars

  • Conversió massiva de text a nombre a Excel (6 maneres)
  • Com convertir una cadena a llarga utilitzant VBA a Excel (3 maneres)
  • Convertir una cadena a doble a Excel VBA (5 mètodes)
  • Com per corregir l'error de conversió a nombre a Excel (6 mètodes)

3. Converteix text en números per a rangs dinàmics a Excel

Ara, els mètodes anteriors eren per als intervals seleccionats . Això vol dir que heu d'introduir manualment el vostre rang de cel·les al codi. Però de vegades el vostre conjunt de dades pot ser gran. En aquests casos, heu de recordar el rang de cel·les. Aquest mètode superarà aquest problema. Sabem que el nostre conjunt de dades comença des de la cel·la B5 . Però no sabem on podria acabar.

Per tant, identifiquem de manera dinàmica l'última fila d'Excel utilitzada que conté dades mitjançant Cells(Rows.Count, "B").End(xlUp).Row . Aixòretorna l'últim número de fila no buit que estem concatenant amb “ B5:B “.

📌 Passos

1. Primer, premeu ALT+F11 al teclat per obrir l' editor VBA .

2. Feu clic a Insereix > Mòdul .

3. A continuació, escriviu el codi següent:

3426

4. Desa el fitxer.

5. A continuació, premeu ALT+F8 . Obrirà el quadre de diàleg Macro .

6. A continuació, seleccioneu ConvertDynamicRanges i feu clic a Executar.

Com podeu veure, tenim èxit en convertir text a números mitjançant el Codis VBA.

💬 Coses per recordar

✎ Aquí, estem utilitzant la columna B per al nostre conjunt de dades. Si les vostres dades es troben en una columna diferent, canvieu l'interval de cel·les dels codis VBA en conseqüència.

✎ Els codis VBA només funcionaran al full actiu.

Conclusió

Per concloure, espero que aquest tutorial us hagi proporcionat un coneixement útil sobre com convertir text a nombre a Excel mitjançant codis VBA. Us recomanem que apreneu i apliqueu totes aquestes instruccions al vostre conjunt de dades. Descarrega el quadern de pràctiques i prova-los tu mateix. A més, no dubteu a fer comentaris a la secció de comentaris. Els vostres valuosos comentaris ens mantenen motivats per crear tutorials com aquest. No oblideu consultar el nostre lloc web Exceldemy.com per trobar diversos problemes i solucions relacionats amb Excel.

Hugh West és un entrenador i analista d'Excel molt experimentat amb més de 10 anys d'experiència en el sector. És llicenciat en Comptabilitat i Finances i Màster en Administració i Direcció d'Empreses. Hugh té una passió per l'ensenyament i ha desenvolupat un enfocament pedagògic únic que és fàcil de seguir i entendre. El seu coneixement expert d'Excel ha ajudat a milers d'estudiants i professionals de tot el món a millorar les seves habilitats i a destacar en les seves carreres. A través del seu bloc, Hugh comparteix els seus coneixements amb el món, oferint tutorials d'Excel gratuïts i formació en línia per ajudar les persones i les empreses a assolir tot el seu potencial.