Кирку нужно найти такие вещи, как «yd2» и заменить его на «yd2»

где «2» стоит над индексом. Он задается вопросом, есть ли способ сделать это в Excel.

Возможности поиска и замены в Excel более ограничены, чем в Word, где такие замены относительно просты. Хотя вы можете экспортировать информацию в Word, выполнить замену, а затем импортировать ее обратно в Excel, есть некоторые вещи, которые вы можете делать, даже не выходя из Excel.

Однако сначала давайте рассмотрим то, что, по вашему мнению, могло бы работать, но на самом деле это не так. Обратите внимание, что вкладка «Заменить» диалогового окна «Найти и заменить», кажется, предоставляет способ указать атрибуты для текста, который вы хотите использовать в качестве замены. Это может привести вас к мысли, что вы можете сделать следующее:

  1. Замените все экземпляры yd2 на yd . Замените все экземпляры на верхний индекс 2.

В теории это звучит хорошо, но не работает. Вы можете выполнить следующие действия, в том числе убедиться, что для замены 2 задан надстрочный индекс. Проблема, однако, в том, что Excel применяет формат надстрочного индекса ко всей ячейке, а не только к 2. Таким образом, вы получаете yd2 полностью как надстрочный индекс.

Вы можете, если хотите, полностью пропустить надстрочный индекс и просто использовать символ гарнитуры, который выглядит как надстрочный. Если вы используете диалоговое окно «Символ», вы можете найти цифры от 0 до 3, которые отображаются надстрочными. Если вы используете надстрочную цифру 2 (ASCII 178) в тексте замены, вы можете получить желаемый вид. Выполните следующие действия:

  1. Нажмите Ctrl + H, чтобы открыть вкладку «Заменить» в диалоговом окне «Найти и заменить». (См. Рис. 1.)

  2. В поле «Найти» введите yd2.

  3. В поле «Заменить на» введите yd, а затем, удерживая нажатой клавишу Alt, введите 0178 на цифровой клавиатуре.

  4. Щелкните «Заменить все».

Наконец, если вы действительно хотите использовать надстрочные символы, лучше всего будет использовать макрос для форматирования. Самый простой метод связан с конкретным приведенным примером — надстрочный индекс 2 в yd2.

Sub DoConvert()

Dim c As Range

For Each c In Selection.Cells         If c.Value = "yd2" Then             c.Characters(3, 1).Font.Superscript = True         End If     Next End Sub

Чтобы использовать макрос, выберите ячейки, которые вы хотите изменить, затем запустите макрос. Каждая ячейка в выделенном фрагменте просматривается и проверяется, содержит ли она текст yd2. Если это так, то третий символ (2) становится надстрочным; остальная часть клетки не нарушена.

_Примечание: _

Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

ExcelTips — ваш источник экономичного обучения Microsoft Excel.

Этот совет (5490) применим к Microsoft Excel 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Excel (Excel 2007 и новее) здесь:

link: / excelribbon-Superscripts_in_Find_and_Replace [Надстрочные символы в поиске и замене].