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

Як витягти десяткове значення із рядка в Excel?

Цей підручник розповість, як витягти десяткове значення лише з рядка в Excel.

Витяг десяткового значення за допомогою формули в Excel
Витяг десяткового значення за допомогою VBA в Excel
Легко витягуйте десяткове значення за допомогою Kutools для Excel


Витяг десяткового значення за допомогою формули в Excel

Є дві формули, які можуть допомогти вам витягти десяткове значення із рядка, виберіть одну з них, як вам потрібно.

Формула, незалежна від знака значень:

Виділіть клітинку та введіть цю формулу = ABS (A1-TRUNC (A1)) (A1 - клітинка, з якої потрібно витягти десяткове значення) у рядок формул, а потім натисніть вводити ключ. Продовжуйте вибирати першу комірку результату, перетягніть маркер заповнення вниз, щоб отримати всі результати. Ви можете бачити, що десяткові значення витягуються лише без знака, як показано нижче.

Формула, що відображає знак значень:

Виділіть клітинку та введіть цю формулу = A1-TRUNC (A1) (A1 - клітинка, з якої потрібно витягти десяткове значення) у рядок формул, а потім натисніть вводити ключ. Продовжуйте вибирати першу комірку результату та перетягніть маркер заповнення вниз, щоб отримати всі результати. Ви можете бачити, як десяткові значення витягуються знаком, як показано на знімку екрана нижче.


Легко витягуйте десяткові числа з вибраного діапазону в Excel:

Kutools для Excel's Витяг тексту Утиліта допоможе вам легко витягти всі десяткові значення із зазначеного діапазону, як показано нижче. 
Завантажте та спробуйте зараз! (30-денна безкоштовна траса)


Витяг десяткового значення за допомогою VBA в Excel

Існує VBA, який може масово витягувати десяткові значення зі знаком лише із рядків.

1. прес Alt + F11 відкрити Microsoft Visual Basic для додатків вікна.

2. У спливаючому вікні натисніть Insert > Модулі, потім вставте наступний код VBA в модуль.

VBA: Витягнути лише десяткові значення

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 Натисніть кнопку F5 клавіша для запуску коду. Тоді a Kutools для Excel спливає діалогове вікно, виберіть діапазон, з якого ви хочете витягувати лише десяткові значення, та клацніть на OK кнопку. Дивіться знімок екрана:

4. Потім інший Kutools для Excel спливає діалогове вікно, вам потрібно вибрати комірку для пошуку вилучених десяткових значень. Дивіться знімок екрана:

Ви можете бачити, як лише десяткові значення вказаних чисел витягуються і розміщуються в певному діапазоні, як показано нижче на знімку знімка.


Легко витягуйте десяткове значення за допомогою Kutools для Excel

Якщо вам не подобаються формула та методи VBA, я представляю вам зручний інструмент - Kutools для Excel. З його Витяг тексту утиліта, ви можете легко витягти все десяткове значення з діапазону в Excel.

Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.

1. Виберіть діапазон із десятковою точкою, який потрібно витягти, а потім натисніть Кутулс > текст > Витяг тексту. Дивіться знімок екрана:

2 В Витяг тексту діалогове вікно введіть .* у текстове поле, а потім клацніть на додавати кнопку. Нарешті натисніть OK кнопку. Дивіться знімок екрана:

3. В іншому спливаючому Витяг тексту діалоговому вікні, виберіть порожню комірку для пошуку результату, а потім клацніть на OK кнопки.

Потім усі десяткові значення у вибраному діапазоні негайно витягуються. Дивіться знімок екрана:

  Якщо ви хочете отримати безкоштовну пробну версію (30-день) цієї утиліти, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.


Легко витягуйте десяткове значення за допомогою Kutools для Excel


Відносні статті:


Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

  • Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
  • Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
  • Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
  • Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
  • Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
  • Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
  • Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
  • Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
  • Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.
вкладка kte 201905

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
дно офісної таблиці
Коментарі (2)
Поки немає оцінок. Оцініть першим!
Цей коментар був мінімізований модератором на сайті
ЩО Я НА СВІТІ СПРАБАВАЛАСЯ ЗРОБИТИ?
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)))))


до речі, C9 була довжиною аудіофайлу, але ввела значення "18.75".
***?
Цей коментар був мінімізований модератором на сайті
Paraer 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 decimales solo aplicar este. Si quieres ver los decimales aislados como números enteros, multiplicas el resultado por 100.
There are no comments posted here yet
Будь ласка, залишайте свої коментарі англійською мовою
Публікація як гість
×
Оцініть цю публікацію:
0   Персонажі
Рекомендовані місця

Слідуй за нами

Copyright © 2009 - WWW.extendoffice.com. | Всі права захищені. На основі ExtendOffice. | Карта сайту
Microsoft та логотип Office є товарними знаками або зареєстрованими товарними знаками Microsoft Corporation у США та / або інших країнах.
Захищений Sectigo SSL