Как быстро найти и заменить символ надстрочным в Excel?
Найти и заменить на верхний индекс функцией Найти и заменить
Найти и заменить надстрочным индексом на VBA
Найти и заменить на верхний индекс функцией Найти и заменить
Фактически, вы можете использовать «Найти» и «Заменить», чтобы найти текст, а затем заменить его надстрочным форматом.
1. Выберите диапазон, в котором вы хотите найти и заменить работу, и нажмите Ctrl + H для открытия Найти и заменить Диалог.
2. в Найти и заменить диалоговое окно, нажмите Замените вкладка, а затем введите текст, который хотите найти, в Найти то, что текстовое окно. Смотрите скриншот:
3. Затем перейдите к Заменить текстовое поле, введите текст, которым хотите заменить, обратите внимание, удерживайте другой и нажмите 0179 ключи на Номерная доска введите верхний индекс 3. См. снимок экрана:
4. Нажмите Заменить все. Появится диалоговое окно с напоминанием о том, сколько замен было произведено. Смотрите скриншот:
Наконечник: Но с помощью этого метода вы можете указать только номер 2, нажав 0178, и 3 на 0179.
Найти и заменить надстрочным индексом на VBA
С помощью функции «Найти и заменить» можно только заменить число на верхний индекс. Если вы хотите заменить букву надстрочным индексом, как показано на скриншоте ниже, вы можете применить код VBA для ее решения.
1. Нажмите Alt + F11 ключи для открытия Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модули, и вставьте ниже код VBA в скрипт.
VBA: найти и заменить на надстрочный формат
Sub DoConvert()
'UpdatebyExtendoffice20160705
Dim xRg As Range
Dim xTxt As String
Dim xCell As Range
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
For Each xCell In xRg
If xCell.Value = "YL3" Then
xCell.Characters(1, 1).Font.Superscript = True
End If
Next
End Sub
3. Нажмите F5 нажмите клавишу, чтобы запустить код, и появится диалоговое окно, напоминающее вам о выборе диапазона. Смотрите скриншот:
4. Нажмите OK, конкретный символ в определенной строке был преобразован в формат надстрочного индекса в выделенном фрагменте. Смотрите скриншот:
Функции: в коде "YL3”- это строка, из которой вы хотите найти, и (1, 1) указывает на преобразование первого символа строки, если вы хотите преобразовать первые два символа, вы можете изменить его как (1, 1), если вы хотите преобразовать 2 символ из второго символа строки, вы можете изменить его как ( 1, 2).
Лучшие инструменты для работы в офисе
Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%
- Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
- Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
- Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
- Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
- Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
- Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
- Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
- Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
- Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
