Přejít k hlavnímu obsahu

Jak extrahovat desetinnou hodnotu z řetězce v aplikaci Excel?

Tento kurz vám řekne, jak extrahovat desetinnou hodnotu pouze z řetězce v aplikaci Excel.

Extrahujte desetinnou hodnotu pomocí vzorce v aplikaci Excel
Extrahujte desetinnou hodnotu pomocí VBA v aplikaci Excel
Snadno extrahujte desítkovou hodnotu pomocí programu Kutools pro Excel


Extrahujte desetinnou hodnotu pomocí vzorce v aplikaci Excel

Existují dva vzorce, které vám pomohou extrahovat desetinnou hodnotu z řetězce, vyberte si jeden z nich podle potřeby.

Vzorec bez ohledu na znaménko hodnot:

Vyberte buňku a zadejte tento vzorec = ABS (A1-TRUNC (A1)) (A1 je buňka, ze které chcete extrahovat desetinnou hodnotu) do řádku vzorců a poté stiskněte vstoupit klíč. Pokračujte ve výběru první buňky výsledků, přetažením úchytu dolů zobrazte všechny výsledky. Můžete vidět, že desetinné hodnoty jsou extrahovány pouze bez znaménka, jak je uvedeno níže.

Vzorec odrážející znaménko hodnot:

Vyberte buňku a zadejte tento vzorec = A1-TRUNC (A1) (A1 je buňka, ze které chcete extrahovat desetinnou hodnotu) do řádku vzorců a poté stiskněte vstoupit klíč. Pokračujte ve výběru první buňky výsledků a přetažením úchytu dolů zobrazte všechny výsledky. Můžete vidět, že desetinné hodnoty jsou extrahovány znakem, jak je uvedeno níže.


Snadno extrahujte desetinná čísla z vybraného rozsahu v aplikaci Excel:

Kutools pro Excel's Extrahujte text nástroj vám pomůže snadno extrahovat všechny desetinné hodnoty ze zadaného rozsahu, jak je ukázáno níže. 
Stáhněte si a vyzkoušejte! (30denní bezplatná trasa)


Extrahujte desetinnou hodnotu pomocí VBA v aplikaci Excel

Existuje VBA, který může hromadně extrahovat desítkové hodnoty se znaménkem pouze z řetězců.

1. lis Alt + F11 k otevření Microsoft Visual Basic pro aplikace okno.

2. Ve vyskakovacím okně klikněte na Vložit > Modul, pak vložte následující kód VBA do modulu.

VBA: Extrahujte pouze desítkové hodnoty

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. zmáčkni F5 klíč ke spuštění kódu. Pak Kutools pro Excel Zobrazí se dialogové okno, vyberte rozsah, ze kterého chcete extrahovat pouze desítkové hodnoty, a klikněte na OK knoflík. Viz screenshot:

4. Pak další Kutools pro Excel Zobrazí se dialogové okno, musíte vybrat buňku pro vyhledání extrahovaných desetinných hodnot. Viz screenshot:

Můžete vidět, že jsou extrahovány pouze desítkové hodnoty zadaných čísel a umístěny do určitého rozsahu, jak je ukázáno níže.


Snadno extrahujte desítkovou hodnotu pomocí programu Kutools pro Excel

Pokud se vám nelíbí metody vzorce a VBA, představuji vám užitečný nástroj - Kutools pro Excel. S jeho Extrahujte text nástroj, můžete snadno extrahovat všechny desítkové hodnoty z rozsahu v aplikaci Excel.

Před aplikací Kutools pro Excel, Prosím nejprve si jej stáhněte a nainstalujte.

1. Vyberte rozsah s desetinnou čárkou, který chcete extrahovat, a poté klikněte Kutools > Text > Extrahujte text. Viz snímek obrazovky:

2. V Extrahujte text dialogové okno, zadejte .* do textového pole a potom klepněte na přidat knoflík. Nakonec klikněte na OK knoflík. Viz screenshot:

3. V dalším vyskakovacím okně Extrahujte text V dialogovém okně vyberte prázdnou buňku pro vyhledání výsledku a poté klikněte na ikonu OK .

Poté jsou okamžitě extrahovány všechny desetinné hodnoty ve vybraném rozsahu. Viz screenshot:

  Pokud chcete mít bezplatnou (30denní) zkušební verzi tohoto nástroje, kliknutím jej stáhněte, a poté přejděte k použití operace podle výše uvedených kroků.


Snadno extrahujte desítkovou hodnotu pomocí programu Kutools pro Excel


Relativní články:

Nejlepší nástroje pro produktivitu v kanceláři

Populární funkce: Najít, zvýraznit nebo identifikovat duplikáty   |  Odstranit prázdné řádky   |  Kombinujte sloupce nebo buňky bez ztráty dat   |   Kolo bez vzorce ...
Super vyhledávání: Více kritérií VLookup    VLookup s více hodnotami  |   VLookup na více listech   |   Fuzzy vyhledávání ....
Pokročilý rozevírací seznam: Rychle vytvořte rozevírací seznam   |  Závislý rozbalovací seznam   |  Vícenásobný výběr rozevíracího seznamu ....
Správce sloupců: Přidejte konkrétní počet sloupců  |  Přesunout sloupce  |  Přepnout stav viditelnosti skrytých sloupců  |  Porovnejte rozsahy a sloupce ...
Doporučené funkce: Zaměření mřížky   |  Návrhové zobrazení   |   Velký Formula Bar    Správce sešitů a listů   |  Knihovna zdrojů (Automatický text)   |  Výběr data   |  Zkombinujte pracovní listy   |  Šifrovat/dešifrovat buňky    Odesílat e-maily podle seznamu   |  Super filtr   |   Speciální filtr (filtr tučné/kurzíva/přeškrtnuté...) ...
Top 15 sad nástrojů12 Text Tools (doplnit text, Odebrat znaky, ...)   |   50+ Graf Typ nemovitosti (Ganttův diagram, ...)   |   40+ Praktické Vzorce (Vypočítejte věk na základě narozenin, ...)   |   19 Vložení Tools (Vložte QR kód, Vložit obrázek z cesty, ...)   |   12 Konverze Tools (Čísla na slova, Přepočet měny, ...)   |   7 Sloučit a rozdělit Tools (Pokročilé kombinování řádků, Rozdělit buňky, ...)   |   ... a více

Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času.  Kliknutím sem získáte funkci, kterou nejvíce potřebujete...

karta kte 201905


Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci

  • Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
  • Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
  • Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!
Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Para extraer los decimales es más sencillo hacer el entero de la cantidad a separar, después restar la cantidad inicial menos la obtenida con el entero. Una vez hecho esto, si quieres formato de decimales solo aplicar este. Si quieres ver los decimales aislados como números enteros, multiplicas el resultado por 100.
This comment was minimized by the moderator on the site
WHAT IN THE WORLD DID I TRY TO DO?
IF((C9-TRUNC(C9))<0.59,C9,IF((TRUNC(C9)+((C9-TRUNC(C9))))-TRUNC((TRUNC(C9)+((C9-TRUNC(C9)))))>0.59,(TRUNC((TRUNC(C9)+((C9-TRUNC(C9))))))/0.6)),((C8-TRUNC(C8))>0.59,(TRUNC(C8)+((C8-TRUNC(C8))/0.6)),C8)))))


by the way C9 was length of a audio file but had entered "18.75" value
***?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations