¿Cómo extraer el valor decimal de la cadena en Excel?

Este tutorial le dirá cómo extraer un valor decimal solo de una cadena en Excel.

Extraer valor decimal con fórmula en Excel
Extraiga el valor decimal con VBA en Excel
Extraiga fácilmente el valor decimal con Kutools para Excel

Extraer valor decimal con fórmula en Excel

Hay dos fórmulas que pueden ayudarlo a extraer el valor decimal de una cadena, elija una de ellas según lo necesite.

La fórmula que es independiente del signo de los valores:

Seleccione una celda y escriba esta fórmula = ABS (A1-TRUNC (A1)) (A1 es la celda de la que desea extraer el valor decimal) en la barra de fórmulas y luego presione Enviar llave. Siga seleccionando la primera celda de resultados, arrastre el controlador de relleno hacia abajo para obtener todos los resultados. Puede ver que los valores decimales se extraen solo sin signo, como se muestra a continuación.

La fórmula que refleja el signo de los valores:

Seleccione una celda y escriba esta fórmula = A1-TRUNC (A1) (A1 es la celda de la que desea extraer el valor decimal) en la barra de fórmulas y luego presione Enviar llave. Siga seleccionando la primera celda de resultados y arrastre el controlador de relleno hacia abajo para obtener todos los resultados. Puede ver que los valores decimales se extraen con el signo como se muestra a continuación.

Extraiga el valor decimal con VBA en Excel

Hay un VBA que puede extraer en masa valores decimales con el signo solo de cadenas.

1. Prensa Alt + F11 para abrir el Microsoft Visual Basic para aplicaciones ventana.

2. En la ventana emergente, haga clic en recuadro > Módulo, luego pegue el siguiente código VBA en el módulo.

VBA: extraer solo valores decimales

Sub GetNumber()
    Dim xSRg As Range
    Dim xDRg As Range
    Dim xPRg As Range
    Dim xSRgArea As Range
    Dim xRgVal As String
    Dim xAddress As String
    Dim I As Long
    Dim K As Long
    Dim KK As Long
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xSRg = Application.InputBox("Please select range:", "KuTools For Excel", xAddress, , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    Set xDRg = Application.InputBox("Select single cell:", "KuTools For Excel", , , , , , 8)
    If xDRg Is Nothing Then Exit Sub
    Set xDRg = xDRg(1)
    For I = 1 To xSRg.Areas.Count
        Set xSRgArea = xSRg.Areas.Item(I)
        For K = 1 To xSRgArea.Count
            xRgVal = xSRgArea(K).Value
            KK = xSRgArea(K).Row - xSRg.Row
            If IsNumeric(xRgVal) Then
                xDRg.Offset(KK) = xRgVal - VBA.Fix(xRgVal)
            End If
        Next
    Next
End Sub

3. presione el F5 clave para ejecutar el código. Entonces un Kutools for Excel aparece el cuadro de diálogo, seleccione el rango del que desea extraer solo los valores decimales y haga clic en el OK botón. Ver captura de pantalla:

4. Luego otro Kutools for Excel aparece el cuadro de diálogo, debe seleccionar una celda para ubicar los valores decimales extraídos. Ver captura de pantalla:

Puede ver que solo los valores decimales de los números especificados se extraen y se colocan en un cierto rango como se muestra a continuación.

Extraiga fácilmente el valor decimal con Kutools para Excel

Si no le gustan la fórmula y los métodos VBA, aquí le presento una herramienta útil: Kutools for Excel. Con su Extraer texto utilidad, puede extraer fácilmente todos los valores decimales de un rango en Excel.

1. Seleccione el rango con decimal que desea extraer y luego haga clic en Kutools > Texto > Extraer texto. Ver captura de pantalla:

2. En el Extraer texto cuadro de diálogo, escriba .* en el cuadro Texto y luego haga clic en el Añada botón. Finalmente haga clic en el OK botón. Ver captura de pantalla:

3. En otra aparición Extraer texto cuadro de diálogo, seleccione una celda en blanco para ubicar el resultado y luego haga clic en OK

Luego, todos los valores decimales en el rango seleccionado se extraen inmediatamente. Ver captura de pantalla:

Extraiga fácilmente el valor decimal con Kutools para Excel

Artículos relativos:

• Extraer tiempo u hora solo en Excel

---

Las mejores herramientas de productividad de oficina

Kutools para Excel resuelve la mayoría de sus problemas y aumenta su productividad en un 80%

• Reutilizar: Inserte rápidamente fórmulas complejas, gráficos y cualquier cosa que hayas usado antes; Cifrar celdas con contraseña; Crear lista de distribución y enviar correos electrónicos ...
• Barra de súper fórmula (edite fácilmente varias líneas de texto y fórmulas); Diseño de lectura (leer y editar fácilmente un gran número de celdas); Pegar en rango filtrado...
• Combinar celdas / filas / columnas sin perder datos; Contenido de celdas divididas; Combinar filas / columnas duplicadas... Prevenir celdas duplicadas; Comparar rangos...
• Seleccione Duplicado o Único Filas; Seleccionar filas en blanco (todas las celdas están vacías); Super Find y Fuzzy Find en muchos libros de trabajo; Selección aleatoria ...
• Copia exacta Varias celdas sin cambiar la referencia de la fórmula; Crear referencias automáticamente a varias hojas; Insertar viñetas, Casillas de verificación y más ...
• Extraer texto, Agregar texto, Eliminar por posición, Quitar espacio; Crear e imprimir subtotales de paginación; Convertir entre contenido de celdas y comentarios...
• Súper filtro (guardar y aplicar esquemas de filtros a otras hojas); Orden avanzado por mes / semana / día, frecuencia y más; Filtro especial en negrita, cursiva ...
• Combinar libros y hojas de trabajo; Combinar tablas basadas en columnas clave; Dividir datos en varias hojas; Conversión por lotes de xls, xlsx y PDF...
• Más de 300 potentes funciones. Compatible con Office/Excel 2007-2021 y 365. Compatible con todos los idiomas. Fácil implementación en su empresa u organización. Funciones completas Prueba gratuita de 30 días. Garantía de devolución de dinero de 60 días.

Leer más ... Descarga gratis... Compra... 

---

Office Tab lleva la interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil

• Habilite la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
• Abra y cree varios documentos en nuevas pestañas de la misma ventana, en lugar de en nuevas ventanas.
• ¡Aumenta su productividad en un 50% y reduce cientos de clics del mouse todos los días!

Leer más ... Descarga gratis... Compra...