Note: The other languages of the website are Google-translated. Back to English
Войти  \/ 
x
or
x
Регистрация  \/ 
x

or

Как заменить прописные буквы на собственные или заглавные в Microsoft Excel?

Иногда вам может потребоваться изменить прописные буквы на регистр заголовка или правильный регистр, как показано на следующем снимке экрана. И эта статья поможет вам изменить все прописные буквы или текстовые строки на правильный регистр или регистр заголовка в Microsoft Excel.

документ изменить верхний регистр на правильный регистр 1

Измените верхний регистр на правильный / заголовок в Excel с помощью функции PROPER

Измените верхний регистр на правильный / заголовок в Excel с кодом VBA

Измените верхний регистр на правильный / заголовок в Excel с помощью Kutools for Excel


Измените верхний регистр на правильный / заголовок в Excel с помощью функции PROPER

Microsoft Excel Надлежащий функция может изменить любой текст на правильный регистр. Пожалуйста, сделайте так:

1. В соседней пустой ячейке B2 введите эту формулу: = ПРАВИЛЬНО (A2), см. снимок экрана:

документ изменить верхний регистр на правильный регистр 2

2, Затем нажмите Enter выберите ячейку B2 и перетащите маркер заполнения по диапазону, который вы хотите содержать эту формулу. И весь текст в верхнем регистре был преобразован в правильный регистр. Смотрите скриншот:

документ изменить верхний регистр на правильный регистр 3

Внимание: Поскольку это формулы, когда вы их копируете и вставляете, вам нужно вставлять их как значения.


Измените верхний регистр на правильный / заголовок в Excel с кодом VBA

1. Активируйте рабочий лист, который вы хотите использовать.

2, Затем нажмите разработчик > Визуальный Бейсик, Новый Microsoft Visual Basic для приложений появится окно (или вы можете нажать горячие клавиши Alt + F11 чтобы открыть окно), затем щелкните Вставить > модуль, и введите следующий код в модуль:

Sub ProperCase()
'Updateby Extendoffice
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
For Each Rng In WorkRng
    Rng.Value = Application.WorksheetFunction.Proper(Rng.Value)
Next
End Sub

3, Затем нажмите кнопку для запуска кода, затем отобразится диалоговое окно для выбора диапазона, см. снимок экрана:

документ изменить верхний регистр на правильный регистр 4

4. Нажмите OK,  и все заглавные буквы были заменены на соответствующие.

документ изменить верхний регистр на правильный регистр 5


Измените верхний регистр на правильный / заголовок в Excel с помощью Kutools for Excel

Ошибка Изменить регистр инструмент Kutools for Excel может помочь вам легко изменить текст или буквы для любых случаев. То же самое с правильным регистром / заголовком в выборках.

Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней. 

1. Выберите диапазон, в котором вы измените верхний регистр на собственный / заголовок.

2, Нажмите Kutools > Текст > Изменить регистр…. Смотрите скриншот:

3, В Изменить регистр диалоговое окно, проверьте Правильный случай вариант, и вы можете просмотреть результаты на предварительный просмотр Панель. Смотрите скриншот:

документ изменить верхний регистр на правильный регистр 7

4, Затем нажмите OK or Применить. И все прописные буквы в выделенном фрагменте меняются на собственный / титульный.

документ изменить верхний регистр на правильный регистр 5

Примечание: Эта полезность Правильный случай может не только изменить верхний регистр на регистр заголовка, но также может изменить весь регистр в выделении на регистр заголовка.

Kutools for Excel's Изменить регистр инструмент может быстро изменить регистр текста на ВЕРХНЯЯ, LOWER, ПРАВИЛЬНОЕ, Дело приговораи СЛУЧАЙ БУТА. Нажмите, чтобы узнать больше...

Нажмите Загрузить и бесплатную пробную версию Kutools for Excel прямо сейчас!


Демонстрация: замените все прописные буквы на собственные или заглавные.

Kutools for Excel: с более чем 300 удобными надстройками Excel, которые можно попробовать бесплатно без ограничений в течение 30 дней. Загрузите и бесплатную пробную версию прямо сейчас!

Статьи по теме:


Лучшие инструменты для работы в офисе

Kutools for Excel решает большинство ваших проблем и увеличивает вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма ...
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон...
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы... Предотвращение дублирования ячеек; Сравнить диапазоны...
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор ...
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое ...
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии...
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом ...
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF...
  • Более 300 мощных функций. Поддерживает Office / Excel 2007-2019 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.
вкладка kte 201905

Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Phil · 4 years ago
    This a great tutorial, and you got the desired result, but you are actually converting to Proper case rather than "Title case".
    This Sentence Is Written In Proper Case.
    This Sentence is Written in Title Case.
    This sentence is written in sentence case.
    In Title case, the first word, proper nouns, etc are capitalised; the "little" words are not. If you try your tutorial with the text in this comment, you'll see even the "little" words become capitalised.
    I've been Googling how to do Title case in Excel, but everyone suggests using =PROPER(), which is not the right solution.
  • To post as a guest, your comment is unpublished.
    KP · 5 years ago
    OMG... Thank you for this. I never knew about the PROPER command. This has been driving me nuts for years!
  • To post as a guest, your comment is unpublished.
    eigo · 5 years ago
    hello, great job. seems legit
  • To post as a guest, your comment is unpublished.
    Don E · 5 years ago
    Oh my gosh, you saved me. Best Excel help site I have seen. Plus I don't have to call Jeff for help every time I open excel.

    Thank you.
    Don
  • To post as a guest, your comment is unpublished.
    sangmesh · 6 years ago
    excel formula change sentence case shortcut key
  • To post as a guest, your comment is unpublished.
    Carmel · 6 years ago
    Try turning it into a function as follows. Save in personal app file and then you can use in all workbooks

    Public Function SENTENCECASE(Sen As String)
    'Sen is the range selected in the brackets of the function as the input cell
    On Error Resume Next

    xValue = Sen
    xStart = True
    For i = 1 To VBA.Len(xValue)
    ch = Mid(xValue, i, 1)
    Select Case ch
    Case "."
    xStart = True
    Case "?"
    xStart = True
    Case "a" To "z"
    If xStart Then
    ch = UCase(ch)
    xStart = False
    End If
    Case "A" To "Z"
    If xStart Then
    xStart = False
    Else
    ch = LCase(ch)
    End If
    End Select
    Mid(xValue, i, 1) = ch
    Next

    SENTENCECASE = xValue
    End Function
  • To post as a guest, your comment is unpublished.
    Chetan Sonawane · 7 years ago
    I wish to Sort the parameters by certain terms and not by Alphabetically, i.e by either A to Z or Z to A.

    Kindly suggest solution.