¿Cómo convertir números de texto en valores numéricos usando VBA?
Separar primero, seleccionar los datos de una sola columna que se van a convertir, hacer clic en el botón Separar debajo de los datos y hacer clic en Finalizar directamente después de que aparezca el cuadro de diálogo. arriba. Si se requieren varias operaciones para varias columnas. La ubicación de los botones de la columna es la siguiente:
La segunda es el método VBA solicitado por el propietario. Este método se utiliza principalmente para resolver situaciones en las que hay demasiadas columnas para procesar. Cuando no hay muchas columnas, no hace falta ser tan complicado. Primero, proporcione el código del programa para convertir toda la tabla en valores numéricos:
Sub-macro 1()
Dim array
arr=activesheet.usedrange< /p >
activesheet.usedrange=arr
Adaptador final
Tenga en cuenta que este código convertirá toda la tabla. Si hay fórmulas en algunas áreas, también se convertirán en valores numéricos. Si en algunas regiones existe un número con la misma longitud que el número de identificación, el contenido se perderá después de la conversión. Si solo convierte un área determinada (por ejemplo, A2: F100), el código debe modificarse de la siguiente manera:
Sub-macro 1()
Disposición tenue
arr=range ("a2:f100")
Range("a2:f100")=array
Conector final
El programa solo procesa un área continua a la vez, de la siguiente manera. El método de bucle se puede utilizar para múltiples áreas (por ejemplo, A2:F100, H3:L5):
Sub-macro 1()
dim array, rng
Para matriz Cada RNG en("A2:f 100","H3:L5")
arr=range(rng)
range(rng)=arr
Siguiente rng
Conector final
Este código puede resolver la situación de innumerables áreas y se puede escribir en secuencia según el formato. .