Як витягти десяткове значення із рядка в 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 Sub3 Натисніть кнопку F5 клавіша для запуску коду. Тоді a Kutools для Excel спливає діалогове вікно, виберіть діапазон, з якого ви хочете витягувати лише десяткові значення, та клацніть на OK кнопку. Дивіться знімок екрана:
4. Потім інший Kutools для Excel спливає діалогове вікно, вам потрібно вибрати комірку для пошуку вилучених десяткових значень. Дивіться знімок екрана:
Ви можете бачити, як лише десяткові значення вказаних чисел витягуються і розміщуються в певному діапазоні, як показано нижче на знімку знімка.
Легко витягніть десяткове значення за допомогою Kutools для Excel
Якщо вам не подобаються формула та методи VBA, я представляю вам зручний інструмент - Kutools для Excel. З його Витяг тексту утиліта, ви можете легко витягти все десяткове значення з діапазону в Excel.
Перед поданням заявки Kutools для Excel, будь ласка завантажте та встановіть його спочатку.
1. Виберіть діапазон із десятковою точкою, який потрібно витягти, а потім натисніть Кутулс > текст > Витяг тексту. Дивіться знімок екрана:
2 В Витяг тексту діалогове вікно введіть .* у текстове поле, а потім клацніть на додавати кнопку. Нарешті натисніть OK кнопку. Дивіться знімок екрана:
3. В іншому спливаючому Витяг тексту діалоговому вікні, виберіть порожню комірку для пошуку результату, а потім клацніть на OK кнопки.
Потім усі десяткові значення у вибраному діапазоні негайно витягуються. Дивіться знімок екрана:
Якщо ви хочете отримати безкоштовну пробну версію (30 днів) цієї програми, натисніть, щоб завантажити, а потім перейдіть до застосування операції, як описано вище.
Легко витягніть десяткове значення за допомогою Kutools для Excel
Відносні статті:
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
