Как да намерите и замените числа с долен индекс в Excel?
Намерете и заменете всички числа с долен индекс от VBA
Намерете и заменете числа с долен индекс в химически формули от Kutools за Excel
Намерете и заменете всички числа с долен индекс от VBA
В Excel, с изключение на макро кода, няма метод, който да ви помогне да намерите и замените текст с индексен формат.
1. Натиснете Alt + F11 ключ за показване Microsoft Visual Basic за приложения прозорец.
2. кликване Поставете > Модулии поставете кода по-долу в празния скрипт.
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 ключ, а Kutools за Excel изскача диалогов прозорец, който ви напомня да изберете работен диапазон. Вижте екранна снимка:
4. След като изберете, щракнете OK, а всички числа в селекцията са преобразувани в долен индекс.
Намерете и заменете числа с долен индекс в химически формули от Kutools за Excel
В допълнение към макро кода, всъщност можете да приложите лесна помощна програма, наречена Долни числа в химичните формули за бързо преобразуване на всички нормални числа в химически формули във формат на долен индекс, ако сте инсталирали Kutools за Excel.
Kutools за Excel, с повече от 300 удобни функции, прави работата ви по-лесна. |
След безплатно инсталиране Kutools за Excel, моля, направете следното:
Изберете клетките, в които искате да форматирате числата като долен индекс, щракнете Kutools > Текст > Долни числа в химичните формули. Вижте екранна снимка:
Изскача диалогов прозорец, за да ви напомни колко клетки са преобразувани и числата в избраните химични формули са форматирани като индексен формат.
Преобразувайте числото в долен индекс в химичната формула
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!