Conas luach deachúil a bhaint as sreang in Excel?

Inseoidh an rang teagaisc seo duit conas luach deachúil a bhaint as sreang in Excel amháin.

Sliocht luach deachúil leis an bhfoirmle in Excel
Sliocht luach deachúil le VBA in Excel
Sliocht luach deachúil go héasca le Kutools for Excel

Sliocht luach deachúil leis an bhfoirmle in Excel

Tá dhá fhoirmle ann a chabhróidh leat luach deachúil a bhaint as sreangán, roghnaigh ceann acu de réir mar a theastaíonn uait.

An fhoirmle is cuma cén comhartha luachanna atá ann:

Roghnaigh cill agus clóscríobh an fhoirmle seo = ABS (A1-TRUNC (A1)) (Is é A1 an chill ar mhaith leat luach deachúil a bhaint aisti) isteach sa Bharra Foirmle, agus ansin brúigh Iontráil eochair. Coinnigh ort ag roghnú an chéad chill toraidh, tarraing an láimhseáil líonta síos chun na torthaí go léir a fháil. Feiceann tú nach mbaintear na luachanna deachúil ach gan comhartha mar a thaispeántar thíos an pictiúr.

An fhoirmle a léiríonn comhartha luachanna:

Roghnaigh cill agus clóscríobh an fhoirmle seo = A1-TRUNC (A1) (Is é A1 an chill ar mhaith leat luach deachúil a bhaint aisti) isteach sa Bharra Foirmle, agus ansin brúigh Iontráil eochair. Coinnigh ort ag roghnú an chéad chill toraidh, agus tarraing an láimhseáil líonta síos chun na torthaí go léir a fháil. Feiceann tú go mbaintear na luachanna deachúil le comhartha mar a thaispeántar thíos an pictiúr.

Sliocht luach deachúil le VBA in Excel

Tá VBA ann a fhéadann luachanna deachúlacha a bhaint as an gcomhartha ó teaghráin amháin.

1. Brúigh Alt + F11 a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Sa fhuinneog aníos, cliceáil Ionsáigh > Modúil, ansin greamaigh an cód VBA seo a leanas sa mhodúl.

VBA: Sliocht luachanna deachúlacha amháin

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. Brúigh an F5 eochair chun an cód a rith. Ansin a Kutools for Excel bosca dialóige aníos, roghnaigh le do thoil an raon is mian leat luachanna deachúlacha a bhaint as, agus cliceáil ar an OK cnaipe. Féach an pictiúr:

4. Ansin ceann eile Kutools for Excel tagann bosca dialóige aníos, ní mór duit cill a roghnú chun na luachanna deachúla eastósctha a aimsiú. Féach an pictiúr:

Ní fheiceann tú ach eastóscadh luachanna deachúla uimhreacha sonraithe agus cuirtear iad ar raon áirithe mar atá thíos scrrenshot a thaispeántar.

Sliocht luach deachúil go héasca le Kutools for Excel

Mura dtaitníonn an fhoirmle agus na modhanna VBA leat, tugann mé uirlis áisiúil duit anseo - Kutools for Excel. Leis an Sliocht Téacs fóntais, is féidir leat gach luach deachúil a bhaint as raon in Excel go héasca.

1. Roghnaigh an raon le deachúil is mian leat a bhaint, agus ansin cliceáil Kutools > Téacs > Sliocht Téacs. Féach an pictiúr:

2. Sa Sliocht Téacs dialóg, cineál .* isteach sa bhosca Téacs, agus ansin cliceáil ar an Cuir cnaipe. Ar deireadh cliceáil ar an OK cnaipe. Féach an pictiúr:

3. I gceann eile popping suas Sliocht Téacs bosca dialóige, roghnaigh cill bhán chun an toradh a aimsiú, agus ansin cliceáil ar an OK cnaipe.

Ansin baintear gach luach deachúil sa raon roghnaithe láithreach. Féach an pictiúr:

Ailt Choibhneasta:

• Sliocht am nó uair an chloig in Excel amháin