11

Есть ли в Excel комбинация клавиш для изменения регистра выбранных ячеек (на нижнюю, верхнюю или любую другую)? Все мои поиски приводят меня только к функциям, чтобы сделать это. Но это не то, что я хочу.

5 ответов5

8

Пол совет хорош, или вы можете написать свои собственные макросы и назначить сочетания клавиш

 Sub makeUPPER()
  ActiveCell = UCase(ActiveCell)
 End Sub

 Sub makeLOWER()
  ActiveCell = LCase(ActiveCell)
 End Sub
4

Я использовал следующую технику для преобразования столбца текста в верхний регистр.

  1. Переместите курсор на пустой столбец.
  2. В пустой ячейке в той же строке, что и первая ячейка, которую вы хотите преобразовать, введите =upper(A3) , если A3 - первая ячейка, которую вы хотите преобразовать.
  3. Ранее пустая ячейка теперь должна отображать верхний регистр, эквивалентный вашей первой ячейке текста.
  4. Скопируйте эту ячейку вниз по столбцу на ту же высоту, что и весь ваш текст.
  5. Теперь у вас должен быть столбец, эквивалентный вашему тексту, но все в верхнем регистре.
  6. Выделите все ячейки заглавного текста и выберите "Копировать".
  7. Щелкните левой кнопкой мыши по первой ячейке вашего исходного текста (которая не в верхнем регистре), которая выберет ячейку.
  8. Щелкните правой кнопкой мыши.
  9. Выберите Paste Special
  10. В списке выберите переключатель "Значения" и нажмите кнопку "ОК".
  11. Теперь у вас будет 2 столбца текста в верхнем регистре.
  12. Удалите столбец, содержащий формулы =upper() .

Тот же принцип работает для надлежащего и других функций управления текстом.

1

Если вы установите отличное дополнение для ASAP Utilities Excel (бесплатно для личного использования)...

http://www.asap-utilities.com/download-asap-utilities.php

в него встроены опции UPPER CASE и строчные буквы (а также множество других), которым вы можете назначить сочетания клавиш (см. их веб-сайт для получения дополнительной информации)

0

Скопируйте текст, который вы хотите изменить регистр для вставки в слово, выделите его и нажмите Shift + F3, пока все не будет в нужном вам случае и вырезать и вернуться назад.

0

Это лучше всего работает для меня, так как работает с несколькими вариантами выбора ячейки:

Sub Uppercase()
    For Each Cell In Selection
        If Not Cell.HasFormula Then
            Cell.Value = UCase(Cell.Value)
        End If
    Next Cell
End Sub

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .