¿Cómo extraer un número decimal de una cadena en Excel?
Este tutorial le mostrará cómo extraer exclusivamente la parte decimal de una cadena en Excel.
Extraer valor decimal con fórmula en Excel
Extraer valor decimal con VBA en Excel
Extraer fácilmente el valor decimal con Kutools para Excel
Extraer valor decimal con fórmula en Excel
Hay dos fórmulas que pueden ayudarle a extraer el valor decimal de una cadena; elija la que mejor se adapte a sus necesidades.
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 pulse la tecla Intro. A continuación, seleccione la primera celda con el resultado y arrastre el controlador de relleno hacia abajo para obtener todos los valores. ¡Verá que solo se extraen las partes decimales, sin signo, tal como muestra la siguiente captura de pantalla!
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 pulse la tecla Intro. A continuación, seleccione la primera celda con el resultado y arrastre el controlador de relleno hacia abajo para obtener todos los valores. ¡Verá cómo los decimales se extraen conservando su signo original, tal como muestra la siguiente captura de pantalla!
Extraiga fácilmente números decimales de un Seleccionar rango en Excel:
La utilidad Extraer texto de Kutools para Excel le permite extraer fácilmente todos los valores decimales de un rango delimitado, tal como se muestra en la siguiente demostración.
¡Descárguelo y pruébelo ahora! (prueba gratuita de 30 días)
Extraer valor decimal con VBA en Excel
¿Existe un código VBA que permita extraer masivamente los valores decimales, incluyendo únicamente su signo, a partir de cadenas de texto?
1. Pulse Alt + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. En la ventana emergente, haga clic en Insertar > Módulo y, a continuación, pegue el siguiente código VBA en el módulo.
VBA: Extraer únicamente los 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 Sub3. Pulse la tecla F5 para ejecutar el código. A continuación, aparecerá un cuadro de diálogo Kutools para Excel; seleccione el rango del que desea extraer únicamente los valores decimales y haga clic en el botón Aceptar. Vea la captura de pantalla:
4. A continuación, aparecerá otro cuadro de diálogo Kutools para Excel; deberá seleccionar una celda para ubicar los valores decimales extraídos. Vea la captura de pantalla:
Podrá comprobar que solo los valores decimales de los números indicados se han extraído y ubicado en un rango específico, tal como se muestra en la siguiente captura de pantalla.
Extraiga fácilmente el valor decimal con Kutools para Excel
Si no le gustan los métodos basados en fórmulas o en VBA, le presentamos una herramienta práctica: Kutools para Excel. Con su función Extraer texto, podrá extraer fácilmente todos los valores decimales de un rango en Excel.
1. Seleccione el rango con los decimales que desea extraer y, a continuación, haga clic en Kutools > Texto > Extraer texto. Vea la captura de pantalla:
2. En el cuadro de diálogo Extraer texto, escriba .* en el cuadro de texto y, a continuación, haga clic en el botón Agregar. Por último, haga clic en el botón Aceptar. Vea la captura de pantalla:
3. En otro cuadro de diálogo emergente Extraer texto, seleccione una celda vacía para ubicar el resultado y, a continuación, haga clic en el botón Aceptar.
Así, todos los valores decimales del rango seleccionado se extraen al instante. Vea la captura de pantalla:
Si desea probar gratuitamente (30 días) esta utilidad, haga clic aquí para descargarla y, a continuación, siga los pasos anteriores para aplicar la operación.
Artículos relacionados:
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active 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 dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos