Як зробити першу літеру великою в Excel?

Допустимо, у вас є список текстових значень і ви хочете зробити першу літеру кожного тексту великою.

Це легко зробити, використовуючи просту формулу. У цьому уроці ми навчимося писати цю формулу, щоб зробити першу букву слова великою.

Функція PROPER для використання першої літери з великої літери

У наступному прикладі у вас є список імен, і всі ці імена написані малими літерами. Тепер вам потрібно перетворити першу літеру у верхній регістр.

Використовуйте такі кроки, щоб зробити першу літеру великою.

1. Введіть значення у комірці B2.
2. Введіть функцію тексту та введіть провідні круглі дужки.
3. Зверніться до осередку A2, де є текст, першу літеру якого ви пишете з великої літери.
4. В кінці введіть дужки, що закривають, і натисніть Enter для отримання результату.

Пишіть із заголовком лише першу літеру першого слова

Тепер давайте візьмемо іншу ситуацію, коли вам потрібно писати з великою лише першу літеру першого слова, а не інші слова. Для цього ви можете використати таку формулу.

=UPPER(LEFT(A2,1))&LOWER(RIGHT(A2,LEN(A2)-1))

Щоб зрозуміти цю формулу, нам потрібно поділити її на дві частини.

У першій частині формули використовуються функції ВЕРХНІЙ і ЛІВИЙ, які витягують першу літеру з тексту та перетворюють її на верхній регістр.

А друга частина формули використовує функції ВПРАВО, ВНИЗ і ВЛІВО. Ці функції беруть решту тексту і перетворять їх у текст у нижньому регістрі.

Але якщо ви хочете зробити першу літеру великою і залишити іншу частину як є, ви можете змінити наведену вище формулу. Подивіться, що буде далі.

=UPPER(LEFT(A2,1))&RIGHT(A2,LEN(A2)-1)

Ця формула не вноситиме жодних змін до тексту, крім першої літери першого слова.

Великі та малі літери в Excel

Мені іноді не вистачає в Excel команди, аналогічної "Регістр" Word'а, яка в одне клацання могла б перетворювати текст на читаний. Наприклад, зробити із повністю рядкового тексту речення. Іншими словами, змінювати регістр і перетворювати великі, тобто великі літери на малі і навпаки. Великі та малі літери в Excel доводиться перетворювати зовсім по-іншому, а саме за допомогою функцій.

Функції

Насамперед звернемо увагу на функції, яких у простих випадках вистачить:

1. Функція РЯДКОВ(). У неї лише один аргумент - текст, який вона перебирає і кожну букву якого перетворює на малу.
2. Функція ПРОПИСН(). Аналогічна попередньої, тільки перетворює все навпаки на великі (великі) літери.
3. Функція ПРОПНАЧ(). Ця функція перетворює на велику першу літеру кожного слова.

У принципі цього вистачає. На малюнку можна переглянути результат роботи цих функцій:

Складні режими

Звичайно, трапляються випадки, коли простого використання цих функцій недостатньо. Наприклад, вже згадана команда "Регістр" містить 5 режимів:

Як бачите, три режими цілком реалізуються через текстові функції. Але решта двох, а саме - "Як у пропозиціях" та "ЗМІНИТИ РЕЄСТР" стандартними засобами не досягти.

У вас є такі варіанти, щоб отримати бажане:

1. Метод простий та грубий. Як казав Принц-Напівкровка у "Гаррі Поттері": "просто засуньте їм у глотку безоар". А саме, копіюєте потрібний текст, переходите в Word, там вставляєте, застосовуєте команду "Регістр", потім текст, що вийшов, тягніть назад в Excel. Переваги - швидкість та нехитрость.Недолік - з великими таблицями доведеться повозитися, змінювати форматування тощо.
2. Використовувати макрос або функцію користувача. Особисто я намагався реалізувати через формули масиву або через комбінації функцій, але виходило так громіздко та неефективно порівняно зі знайденим на сайті "Світ MS Excel" способом, що я вирішив його передати без будь-яких поправок.

функція користувача

Ось сам текст функції:

Function ConvertRegistr(sString As String, Tip As Byte) As String 'Tip = 1 - ВСІ ПЕРЕПИСНІ 'Tip = 2 - всі малі 'Tip = 3 - Починати З Великих 'Tip = 4 - Як у пропозиціях 'Tip = 5 - ЗМІНИТИ РЕЄСТР Dim i&If Tip = 4 Then ConvertRegistr = StrConv(sString, 2) Mid$(ConvertRegistr, 1, 1) = UCase(Mid$(ConvertRegistr, 1, 1)) ElseIf Tip > 4 Then For i = 1 To Len(sString) Mid$(sString, i, 1 ) = IIf(Mid$(sString, i, 1) = UCase(Mid$(sString, i, 1)), _ LCase(Mid$(sString, i, 1)), UCase(Mid$(sString, i, 1))))

Як нею користуватися, по кроках:

1. Відкриваєте Excel, натискаєте Alt+F11, з'явиться вікно Visual Basic.
2. Команда Insert/Module. У поле, що відкрилося, вставляєте текст.
3. Переходьте до Excel, тепер у списку функцій, у повному алфавітному переліку у вас з'явилася функція ConvertRegistr.
4. Ця функція має два аргументи - осередок і режим перетворення регістру. У тексті функції є коментарі, який режим позначений цифрою. По суті вона замінює попередні три функції, а працює повним аналогом команди "Регістр". Щоправда, є нюанс – 4й пункт – "Як у пропозиціях" – працює тільки для однієї пропозиції. Якщо комусь потрібно, пишіть на мейл, скину робочий варіант, який переробить нормальний літературний текст.
5. Якщо ви хочете, щоб функція завжди була під рукою, збережіть файл як надбудову Excel у папці Addins. У мене вона знаходиться за адресою: C:\Users\user\AppData\Roaming\Microsoft\AddIns.
6. Активуйте надбудову через Офіс/Параметри Excel/Надбудови/Перейти до надбудови. Там з'явиться вікно, де треба буде поставити галочку навпроти назви файлу. Також можливо прописати макрос перетворення регістру в діапазонах, це ви зможете подивитися тут.

Удачі у використанні!
Ексель Практик
«Очі бояться, а руки роблять»

P.S. Сподобалася стаття? Підпишіться на розсилку у правій частині сторінки (Безкоштовний курс "Топ-10 інструментів Excel") та будьте в курсі нових подій.