Note: The other languages of the website are Google-translated. Back to English

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! (30-denní trasa zdarma)


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 zkušební verzi (30-den) této utility, 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ší kancelářské nástroje produktivity

Kutools pro Excel řeší většinu vašich problémů a zvyšuje vaši produktivitu o 80%

  • Opakované použití: Rychle vložte složité vzorce, grafy a cokoli, co jste dříve používali; Šifrovat buňky s heslem; Vytvořte seznam adresátů a posílat e-maily ...
  • Super Formula Bar (snadno upravit více řádků textu a vzorce); Rozložení pro čtení (snadno číst a upravovat velké množství buněk); Vložit do filtrovaného rozsahu...
  • Sloučit buňky / řádky / sloupce bez ztráty dat; Rozdělit obsah buněk; Zkombinujte duplicitní řádky / sloupce... Zabraňte duplicitním buňkám; Porovnat rozsahy...
  • Vyberte možnost Duplikovat nebo Jedinečný Řádky; Vyberte prázdné řádky (všechny buňky jsou prázdné); Super hledání a fuzzy hledání v mnoha sešitech; Náhodný výběr ...
  • Přesná kopie Více buněk beze změny odkazu na vzorec; Automaticky vytvářet reference do více listů; Vložte odrážky, Zaškrtávací políčka a další ...
  • Extrahujte text, Přidat text, Odebrat podle pozice, Odebrat mezeru; Vytváření a tisk mezisoučtů stránkování; Převod mezi obsahem buněk a komentáři...
  • Super filtr (uložit a použít schémata filtrů na jiné listy); Rozšířené řazení podle měsíce / týdne / dne, frekvence a dalších; Speciální filtr tučnou kurzívou ...
  • Kombinujte sešity a pracovní listy; Sloučit tabulky na základě klíčových sloupců; Rozdělte data do více listů; Dávkový převod xls, xlsx a PDF...
  • Více než 300 výkonných funkcí. Podporuje Office / Excel 2007-2021 a 365. Podporuje všechny jazyky. Snadné nasazení ve vašem podniku nebo organizaci. Plné funkce 30denní bezplatná zkušební verze. 60denní záruka vrácení peněz.
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!
officetab dno
Komentáře (2)
Zatím žádné hodnocení. Buďte první, kdo ohodnotí!
Tento komentář byl moderátorem webu minimalizován
CO JSEM SE VE SVĚTĚ SNAŽIL UDĚLAT?
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)))))


mimochodem C9 byla délka zvukového souboru, ale byla zadána hodnota "18.75".
***?
Tento komentář byl moderátorem webu minimalizován
Para extraer los decimales es más sencillo hacer el entero de la cantidad a separar, después restar la cantidad inicial mens la obtenida con el entero. Una vez hecho esto, si quieres formato decimales solo aplicar este. Si quieres ver los decimales aislados como numeros enteros, multiplicas el resultado por 100.
Zatím zde nejsou žádné komentáře
Zanechat své připomínky
Odesílání jako host
×
Ohodnoťte tento příspěvek:
0   Postavy
Doporučená umístění

Sociální sítě

Copyright © 2009 - www.extendoffice.com. | Všechna práva vyhrazena. Poháněno ExtendOffice. | |. | Sitemap
Microsoft a logo Office jsou ochranné známky nebo registrované ochranné známky společnosti Microsoft Corporation ve Spojených státech a / nebo jiných zemích.
Chráněno Sectigo SSL