Як знайти та замінити цифри на індекс в Excel?

Знайдіть і замініть усі числа на індекс за допомогою VBA
Знайдіть і замініть числа з індексом у хімічних формулах за Kutools for Excel

Знайдіть і замініть усі числа на індекс за допомогою VBA
В Excel, крім макрокоду, жоден метод не може допомогти вам знайти та замінити текст на формат підрядкового тексту.
1. прес Alt + F11 клавіша для відображення Microsoft Visual Basic для додатків вікна.
2. клацання Insert > Модуліі вставте код нижче в порожній сценарій.
VBA: Знайдіть і замініть усі числа на індексний формат
Sub SubscriptNumbers()
'UpdatebyExtendoffice20160705
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
Dim xChar As String
Dim I As Long
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Select a range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In xRg
xTxt = xCell.Value
For I = 1 To Len(xTxt)
xChar = Mid(xTxt, I, 1)
If xChar >= "0" And xChar <= "9" Then
xCell.Characters(I, 1).Font.Subscript = True
End If
Next
Next
Application.ScreenUpdating = True
End Sub
3. прес F5 ключ, a Kutools for Excel спливає діалогове вікно, щоб нагадати вам про вибір робочого діапазону. Дивіться знімок екрана:
4. Після вибору натисніть OK, а всі номери у виділенні перетворені на індекси.
Знайдіть і замініть числа з індексом у хімічних формулах за Kutools for Excel
На додаток до коду макросу, насправді, ви можете застосувати просту утиліту під назвою Номери нижнього індексу в хімічних формулах для швидкого перетворення всіх нормальних чисел у хімічних формулах у формат нижнього індексу, якщо ви встановили Kutools for Excel.
Kutools for Excel, з більш ніж 300 зручні функції, полегшує вам роботу. |
після безкоштовна установка Kutools for Excel, будь ласка, виконайте наведені нижче дії:
Виділіть клітинки, які потрібно відформатувати, як індекс, натисніть Кутулс > текст > Номери нижнього індексу в хімічних формулах. Дивіться знімок екрана:
І з’явиться діалогове вікно, щоб нагадати, скільки клітинок було перетворено, а числа у вибраних хімічних формулах були відформатовані як формат нижчого індексу.
Перетворення числа в індекс в хімічній формулі
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools for Excel, і відчуйте ефективність, як ніколи раніше. Kutools for Excel Пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Office Tab Надає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
