Как быстро найти позицию первого верхнего регистра в текстовой строке Excel?
Предположим, есть список текстовых строк, смешанных с числами, прописными и строчными буквами, как вы можете быстро найти позицию первой прописной буквы в строках? В этой статье я расскажу о приемах, с помощью которых можно быстро указать положение первого верхнего регистра, не считая их один за другим вручную в Excel.
Найти позицию первого верхнего регистра в строке с формулой
Найти позицию первого верхнего регистра в строке с помощью определенной функции
Измените все буквы на ВЕРХНИЙ или правильный регистр с помощью Kutools for Excel 
Найти позицию первого верхнего регистра в строке с формулой
Вот формула, которая может помочь вам быстро найти позицию первого верхнего регистра в строке, сделайте следующее:
Выберите пустую ячейку рядом со строкой, в которой вы хотите найти первый верхний регистр, например B1, введите эту формулу =MIN(IF(ISERROR(FIND(CHAR(ROW(INDIRECT("65:90"))),A1)),"",FIND(CHAR(ROW(INDIRECT("65:90"))),A1)))
Нажмите Shift + Ctrl + Ввод , чтобы получить правильный результат, а затем перетащите маркер автозаполнения по ячейкам, которые необходимы для применения этой формулы. Смотрите скриншот:
Найти позицию первого верхнего регистра в строке с помощью определенной функции
Кроме формулы, вы также можете использовать Определенную функцию, чтобы узнать позицию первого верхнего регистра в строке.
1. Включите лист, содержащий строку, которую вы хотите найти в верхнем регистре, и нажмите Alt + F11 ключи для открытия Microsoft Visual Basic для приложений окно.
2. Щелкните правой кнопкой мыши на листе, в котором вы хотите использовать код. Project Explore панель и щелкните Вставить > Модулии вставьте приведенный ниже код в пустой скрипт модуля. Смотрите скриншот:
Код: найти позицию первого верхнего регистра в строке.
Function GetFirstUpper(Rg As Range) As Integer
'UpdatebyExtendoffice20160726
Dim xStr As String
Dim I As Integer
Application.Volatile
GetFirstUpper = -1
On Error Resume Next
xStr = Trim(Rg.Value)
For I = 1 To Len(xStr)
If (Asc(Mid(xStr, I, 1)) < 91) And (Asc(Mid(xStr, I, 1)) > 64) Then
GetFirstUpper = I
Exit Function
End If
Next
End Function
3. Сохраните код и вернитесь к листу, который вы используете, и выберите пустую ячейку рядом со строкой, которую вы хотите найти в верхнем регистре, введите эту формулу. = GetFirstUpper (F1), нажмите Enter key, а затем перетащите дескриптор автозаполнения на ячейки, в которых нужна эта формула. Смотрите скриншот:
Функции: Если в строке нет верхнего регистра, результат отображается как -1.
Измените все буквы на ВЕРХНИЙ или правильный регистр с помощью Kutools for Excel
Обычно при работе с Excel вам может потребоваться изменить буквенные строки на ВЕРХНИЕ, Правильный регистр, строчные буквы, Регистр предложений или ToGgLe CaSe, как показано ниже.
Доступно Kutools для Exceл, вы можете применить его Изменить регистр утилита для быстрой смены регистра букв по мере необходимости.
| Kutools for Excel, с более чем 300 удобные функции, облегчающие вашу работу. |
После бесплатная установка Kutools for Excel, сделайте следующее:
1. Выберите строки, регистр которых вы хотите изменить, и нажмите Кутулс > Текст > Изменить регистр. Смотрите скриншот:
2. Затем в всплывающем Изменить регистр диалоговом окне выберите нужный вариант в Изменить тип раздел, и вы можете предварительно просмотреть результат изменения на панели предварительного просмотра. Смотрите скриншот:
3. Затем нажмите Ok or Применить изменить регистр.
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
