Hur extraherar jag decimalvärde från sträng i Excel?
Denna handledning kommer att berätta hur man endast extraherar decimalt värde från en sträng i Excel.
Extrahera decimalvärde med formel i Excel
Extrahera decimalt värde med VBA i Excel
Extrahera enkelt decimalvärde med Kutools för Excel
Extrahera decimalvärde med formel i Excel
Det finns två formler som kan hjälpa dig att extrahera decimalvärde från en sträng, välj en av dem efter behov.
Formeln som är oberoende av tecken på värden:
Välj en cell och skriv den här formeln = ABS (A1-TRUNC (A1)) (A1 är cellen du vill extrahera decimalvärde från) till formelfältet och tryck sedan på ange nyckel. Fortsätt att välja den första resultatcellen, dra fyllhandtaget nedåt för att få alla resultat. Du kan se att decimalvärdena extraheras endast utan tecken som visas nedan.
Formeln som återspeglar tecken på värden:
Välj en cell och skriv den här formeln = A1-TRUNC (A1) (A1 är cellen du vill extrahera decimalvärde från) till formelfältet och tryck sedan på ange nyckel. Fortsätt att välja den första resultatcellen och dra nedåt för att få alla resultat. Du kan se decimalvärdena extraheras med tecknet enligt nedanstående skärmdump.
Extrahera enkelt decimaltal från ett valt intervall i Excel:
Kutools för Excel's Extrahera text verktyget hjälper dig att enkelt extrahera alla decimalvärden från ett angivet intervall enligt nedanstående demo.
Ladda ner och prova nu! (30 dagars gratis spår)
Extrahera decimalt värde med VBA i Excel
Det finns en VBA som endast kan extrahera decimalvärden med tecknet endast från strängar.
1. Tryck Alt + F11 att öppna Microsoft Visual Basic för applikationer fönster.
2. Klicka på i popup-fönstret Insert > Modulernaoch klistra sedan in följande VBA-kod i modulen.
VBA: Extrahera endast decimalvärden
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. tryck på F5 för att köra koden. Då en Kutools för Excel dialogrutan dyker upp, välj det intervall du bara vill extrahera decimalvärden från och klicka på OK knapp. Se skärmdump:
4. Sedan en till Kutools för Excel dialogrutan dyker upp, måste du välja en cell för att hitta de extraherade decimalvärdena. Se skärmdump:
Du kan bara se decimalvärdena för angivna nummer extraheras och placeras i ett visst intervall som visas nedan.
Extrahera enkelt decimalvärde med Kutools för Excel
Om du inte gillar formeln och VBA-metoderna presenterar jag dig här ett praktiskt verktyg - Kutools för Excel. Med dess Extrahera text verktyg kan du enkelt extrahera alla decimalvärden från ett intervall i Excel.
Innan du ansöker Kutools för ExcelBer ladda ner och installera det först.
1. Välj det intervall med decimal du vill extrahera och klicka sedan på Kutools > text > Extrahera text. Se skärmdump:
2. I Extrahera text dialogrutan, skriv .* i textrutan och klicka sedan på Lägg till knapp. Klicka slutligen på OK knapp. Se skärmdump:
3. I en annan dyker upp Extrahera text Välj en tom cell för att hitta resultatet och klicka sedan på OK knapp.
Sedan extraheras alla decimalvärden i det valda intervallet omedelbart. Se skärmdump:
Om du vill ha en gratis provperiod (30 dagar) av det här verktyget, klicka för att ladda ner den, och gå sedan till för att tillämpa operationen enligt ovanstående steg.
Extrahera enkelt decimalvärde med Kutools för Excel
Relativa artiklar:
Bästa kontorsproduktivitetsverktyg
Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid. Klicka här för att få den funktion du behöver mest...
Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare
- Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
- Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
- Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
