Приветствую вас, уважаемые читатели. Сегодня я с вами поделюсь некоторой очень полезной функцией в Excel, а именно расскажу о том, как сделать все буквы ЗАГЛАВНЫМИ в Excel. При работе с Word это делается довольно просто, если знать. А как это делать в Excel? Давайте вместе разберемся.

Как делается это в Word? Нужно выделить слово и нажать на клавишу SHIFT + F3. После нескольких нажатий мы получим все слова в ВЕРХНЕМ регистре. А что происходит в Excel? Он предлагает ввести формулу.

Дело в том, что в таблице Эксель нужно использовать специальные формулы, которые приводят слова к ВЕРХНЕМ или нижнему регистру. Рассмотрим два случая – когда все написано ЗАГЛАВНЫМИ буквами, и когда маленькими буквами.

Я подготовил таблицу к одному из уроков (перейти ), ей я и воспользуюсь. Работать я буду в Excel 2013. Но способ по превращению заглавных букв в маленькие и наоборот будет работать в Excel 2010, 2007.

Как маленькие буквы сделать БОЛЬШИМИ

В моей таблице данные расположены в столбце А, потому формулу я буду вводить в столбце В. Вы же в своей таблице делайте в любом свободном столбце, либо добавьте новый.

Итак, начнем с ячейки А1. Ставим курсор на ячейку В1, открываем вкладку «Формулы» и в разделе «Библиотека функций» выбираем «Текстовые».

В выпадающем меню находим «ПРОПИСН». У нас откроется окно «Аргументы функций», которое запрашивает адрес ячейки, из который будут взяты данные. В моем случае – это ячейка А1. Ее я и выбираю.

После этого нажимаю на «ОК», а быстрее, нажать на ENTER на клавиатуре.

Теперь в ячейке В1 написано «=ПРОПИСН(A1)», что значит «сделать ПРОПИСНЫМИ все буквы в ячейке А1». Отлично, осталось лишь применить эту же формулу для остальных ячеек в столбце.

Подводим курсор к правому краю ячейки и курсор становиться в виде жирного крестика. Зажимаем левую кнопку мыши и тащим до конца столбца с данными. Отпускаем и формула применяется для всех выделенных строк.

На этом все. Смотрите, как это выглядит у меня.

Как БОЛЬШИЕ буквы сделать маленькими

Когда у нас получилось образовать в заглавные буквы, я покажу, как их вернуть в строчные. Столбец В у меня заполнен большими словами, и я воспользуюсь столбцом С.

Начну с ячейки В1, потому ставлю курсор в С1. Отрываем вкладку «Формулы», затем «Текстовые» в «Библиотеке функций». В этом списке нужно найти «СТРОЧН» от слова «строчные».

Снова выскакивает окно, просящее указать ячейку с данными. Я выбираю В1 и жму Enter (либо кнопку «ОК).

Далее применяю эту же формулу ко всему столбцу. Подвожу курсор к правому нижнему углу ячейки, курсор превратился в толстый крестик, зажимаю левую кнопку мыши и тяну до конца данных. Отпускаю, и, дело сделано. Все БОЛЬШИЕ буквы стали маленькими.

Как сохранить данные после изменения?

Думаю, это хороший вопрос, ведь, если удалить первоначальные значения из столбца А, то и все результаты работы формулы пропадут.

Смотрите, что нужно для этого сделать.

Выделяем в столбце с результатом все полученные данные. Копируем их CTRL + V (русская М), либо правой кнопкой мыши – «Копировать».

Выбираем пустой столбец. Затем нажимаем в нем правой кнопкой мыши, находим специальные параметры Вставки и выбираем «Значения».

Вот такая хитрость. Теперь вас не смутит необходимость перевести все буквы в ВЕРХНИЙ или нижний регистр.

Разберемся как изменять регистр букв в Excel, т.е. переводить заглавные (прописные) буквы в строчные и наоборот, а также другие различные нестандартные расстановки.

Приветствую всех, уважаемые читатели блога TutorExcel.Ru.

Наверняка многие из вас сталкивались с задачей изменения текста с той целью, чтобы его было удобнее воспринимать и читать, например, перевести заглавные буквы в строчные (проще говоря, большие в маленькие) или наоборот, строчные буквы в заглавные (маленькие в большие), представить текст в стандартном виде (как в предложениях), поменять регистр на противоположный и т.д.
Поэтому, несмотря на то, что Microsoft Excel в основном ориентирован на работу с числовыми данными, все-таки не стоит забывать и про возможность работы с текстовыми данными.

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

• Применение Microsoft Word.Конвертирование данных посредством программы Microsoft Word;
• Стандартные функции Excel.Поменять регистр текста можно воспользовавшись функциями СТРОЧН (изменяет все буквы на строчные), ПРОПИСН (изменяет все символы на заглавные) и ПРОПНАЧ (изменяет первые буквы слов на заглавные, все оставшиеся — на строчные);
• Применение пользовательских функций (UDF).Если варианты со стандартным функционалом не подходят, и нужна другая расстановка прописных и строчных символов, то можно реализовать пользовательскую функцию.

Применение Microsoft Word

Так как в Microsoft Word возможность изменения регистра текста уже реализована, то можно не изобретать велосипед и для перевода заглавных букв в строчные (и наоборот) воспользоваться программой Word.
Алгоритм простой — выделяем и копируем данные из Excel, переходим в Word и вставляем их в документ. Далее применяем опцию Регистр (располагается на вкладке Главная в блоке Шрифт), а затем возвращаем отредактированные данные обратно в Excel.

Метод требует ручного ввода текстовых данных, поэтому для большого объема данных крайне неудобный, в связи с чем такой способ имеет смысл применять только для разовых задач и если нет необходимости автоматизировать процесс.

Стандартные функции Excel

Excel предлагает нам 3 стандартные функции для преобразования данных в строчные (все строчные) и прописные буквы (ВСЕ ПРОПИСНЫЕ), а также смешанную расстановку (Начинать С Прописных).
Детально изучим каждый из вариантов конвертации текстовых данных.

Как сделать все буквы строчными в Excel?

Сделать перевод всех символов в строчные можно с помощью функции СТРОЧН (английская версия LOWER) в Excel:

СТРОЧН(текст)
Делает все буквы в строке текста строчными.

• Текст (обязательный аргумент) — текст, буквы которого конвертируются в нижний регистр (т.е. в маленькие).

Применим функцию СТРОЧН, где в качестве аргумента выбираем произвольный текст, в котором мы хотим сконвертировать все символы в строчные:

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

Для перевода текстовых данных в большие буквы можно обратиться к функции ПРОПИСН (английская версия UPPER):

ПРОПИСН(текст)
Делает все буквы в строке текста прописными.

• Текст (обязательный аргумент) — текст, буквы которого конвертируются в верхний регистр (т.е. в большие).

Принцип действия аналогичный, применяем функцию ПРОПИСН, аргументом указываем текст, который мы планируем сделать состоящим только из заглавных символов:

Как сделать первую букву заглавной в Excel?

Для изменения начального символа каждого слова в тексте из строчного в заглавный можно воспользоваться функцией ПРОПНАЧ (английская версия PROPER):

ПРОПНАЧ(текст)
Начинает текстовую строку с заглавной буквы; делает прописной первую букву в каждом слове текста, преобразуя все другие в строчные.

• Текст (обязательный аргумент) — текст, в котором начальные буквы слов конвертируются в верхний регистр (т.е. в большие), все оставшиеся — в нижний (т.е. в маленькие).

Все то же самое, что и в предыдущих примерах, применяем к данным функцию ПРОПНАЧ, в котором хотим конвертировать начальные буквы слов в большие, а все оставшиеся сделать маленькими:

Однако при работе с ПРОПНАЧ необходимо учитывать, что Excel воспринимает знаки препинания как начало нового слова.
В данном случае не только запятая, точка, пробел, вопросительный или восклицательный знак означают конец слова, но и любые другие знаки препинания (двоеточие, точка с запятой, кавычки, скобки, дефис, тире и т.д.).
Из-за этого могут возникнуть ситуации, когда некоторые слова преобразуются правильно (пример алма-ата -> Алма-Ата), а некоторые некорректно (пример кое-что -> Кое-Что).

Применение пользовательских функций (UDF)

Идём дальше и переходим к нестандартным способам конвертации.
Третий вариант изменения регистра текста — пользовательская функция, где мы можем реализовать любой произвольный шаблон конвертирования.
Давайте повторим функционал смены регистра из текстового редактора Word, в которой к 3 основным (ВСЕ ПРОПИСНЫЕ, все строчные и Начинать С Прописных) добавляются еще 2 варианта — Как в предложениях и иЗМЕНИТЬ рЕГИСТР.
Так как в общем и целом никаких ограничений на итоговый вид текстовых данных нет, то также добавим реализацию нестандартных расстановок, к примеру, ЧеРеДоВаНиЕ рЕгИсТрОв и ПрОИЗвоЛЬноЕ нАПиСАниЕ.

Переходим в редактор Visual Basic (горячая клавиша Alt + F11), добавляем новый модуль и записываем код новой функции (напротив основных действий кода даются пояснения):

Function ChangeRegister(Text As String, TextType As Integer) As String     ‘Тип TextType:     ‘1 — ВСЕ ПРОПИСНЫЕ     ‘2 — все строчные     ‘3 — Начинать С Прописных     ‘4 — Как в предложениях     ‘5 — иЗМЕНИТЬ рЕГИСТР     ‘6 — ЧеРеДоВаНиЕ рЕгИсТрОв     ‘7 — ПрОИЗвоЛЬноЕ нАПиСАниЕ     If TextType = 1 Or TextType = 2 Or TextType = 3 Then ‘Если тип данных 1, 2 или 3…         ChangeRegister = StrConv(Text, TextType) ‘… то конвертируем встроенной функцией     ElseIf TextType = 4 Then ‘Если тип данных 4         ChangeRegister = StrConv(Text, 2) ‘То конвертируем в тип 2 (делаем все символы строчные)         Mid$(ChangeRegister, 1, 1) = UCase(Mid$(ChangeRegister, 1, 1)) ‘Затем меняем начальный символ на заглавный     ElseIf TextType = 5 Then ‘Если тип данных 5         For i = 1 To Len(Text) ‘Цикл по каждому символу             Mid$(Text, i, 1) = IIf(Mid$(Text, i, 1) = UCase(Mid$(Text, i, 1)), LCase(Mid$(Text, i, 1)), UCase(Mid$(Text, i, 1))) ‘Меняем регистр символа на противоположный         Next i         ChangeRegister = Text     ElseIf TextType = 6 Then ‘Если тип данных 6         For i = 1 To Len(Text)             Mid$(Text, i, 1) = IIf(i Mod 2 = 0, LCase(Mid$(Text, i, 1)), UCase(Mid$(Text, i, 1))) ‘Чередуем регистр         Next i         ChangeRegister = Text     Else ‘В остальных случаях         For i = 1 To Len(Text)             Mid$(Text, i, 1) = IIf(Round(Rnd()) = 0, LCase(Mid$(Text, i, 1)), UCase(Mid$(Text, i, 1))) ‘Произвольный регистр         Next i         ChangeRegister = Text     End If End Function

У данной функции всего 2 аргумента: ячейка с текстом и тип преобразования данных.
Переходим обратно в Excel и в строке формул набираем функцию пользователя ChangeRegister (или находим ее в категории Определенные пользователем посредством мастера функций):

Небольшое замечание. При конвертировании по типу Как в предложениях, корректное преобразование происходит только для первого предложения фразы. В том случае, когда во фразе несколько предложений, то будет необходимо подкорректировать код пользовательской функции.

Ознакомиться с разобранными материалами можно скачав пример.

Спасибо за внимание!
Если у вас есть мысли по теме или остались вопросы — пишите в комментариях.

Удачи вам и до скорых встреч на страницах блога TutorExcel.Ru!

В некоторых ситуациях весь текст в документах Excel требуется писать в верхнем регистре, то есть, с заглавной буквы. Довольно часто, например, это нужно при подаче заявлений или деклараций в различные государственные органы. Чтобы написать текст большими буквами на клавиатуре существует кнопка Caps Lock. При её нажатии запускается режим, при котором все введенные буквы будут заглавными или, как говорят по-другому, прописными.

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

Читайте также: Как в Ворде сделать текст заглавными буквами

Трансформация строчных символов в прописные

Если в программе Word для преобразования букв в заглавные (прописные) достаточно выделить нужный текст, зажать кнопку SHIFT и дважды кликнуть по функциональной клавише F3, то в Excel так просто решить проблему не получится. Для того, чтобы преобразовать строчные буквы в заглавные, придется использовать специальную функцию, которая называется ПРОПИСН, или воспользоваться макросом.

Способ 1: функция ПРОПИСН

Сначала давайте рассмотрим работу оператора ПРОПИСН. Из названия сразу понятно, что его главной целью является преобразование букв в тексте в прописной формат. Функция ПРОПИСН относится к категории текстовых операторов Excel. Её синтаксис довольно прост и выглядит следующим образом:

=ПРОПИСН(текст)

Как видим, оператор имеет всего один аргумент – «Текст». Данный аргумент может являться текстовым выражением или, что чаще, ссылкой на ячейку, в которой содержится текст. Данный текст эта формула и преобразует в запись в верхнем регистре.

Теперь давайте на конкретном примере разберемся, как работает оператор ПРОПИСН. У нас имеется таблица с ФИО работников предприятия. Фамилия записана в обычном стиле, то есть, первая буква заглавная, а остальные строчные. Ставится задача все буквы сделать прописными (заглавными).

1. Выделяем любую пустую ячейку на листе. Но более удобно, если она будет располагаться в параллельном столбце тому, в котором записаны фамилии. Далее щелкаем по кнопке «Вставить функцию», которая размещена слева от строки формул.
2. Запускается окошко Мастера функций. Перемещаемся в категорию «Текстовые». Находим и выделяем наименование ПРОПИСН, а затем жмем на кнопку «OK».
3. Происходит активация окна аргументов оператора ПРОПИСН. Как видим, в этом окне всего одно поле, которое соответствует единственному аргументу функции – «Текст». Нам нужно в это поле ввести адрес первой ячейки в столбце с фамилиями работников. Это можно сделать вручную. Вбив с клавиатуры туда координаты. Существует также и второй вариант, который более удобен. Устанавливаем курсор в поле «Текст», а потом кликаем по той ячейке таблицы, в которой размещена первая фамилия работника. Как видим, адрес после этого отображается в поле. Теперь нам остается сделать последний штрих в данном окне – нажать на кнопку «OK».
4. После этого действия содержимое первой ячейки столбца с фамилиями выводится в предварительно выделенный элемент, в котором содержится формула ПРОПИСН. Но, как видим, все отображаемые в данной ячейке слова состоят исключительно из заглавных букв.
5. Теперь нам нужно произвести преобразование и для всех других ячеек столбца с фамилиями работников. Естественно, мы не будем для каждого сотрудника применять отдельную формулу, а просто скопируем уже существующую при помощи маркера заполнения. Для этого ставим курсор в нижний правый угол элемента листа, в котором содержится формула. После этого курсор должен преобразоваться в маркер заполнения, который выглядит как небольшой крестик. Производим зажим левой кнопки мыши и тянем маркер заполнения на количество ячеек равное их числу в столбце с фамилиями сотрудников предприятия.
6. Как видим, после указанного действия все фамилии были выведены в диапазон копирования и при этом они состоят исключительно из заглавных букв.
7. Но теперь все значения в нужном нам регистре расположены за пределами таблицы. Нам же нужно вставить их в таблицу. Для этого выделяем все ячейки, которые заполнены формулами ПРОПИСН. После этого кликаем по выделению правой кнопкой мыши. В открывшемся контекстном меню выбираем пункт «Копировать».
8. После этого выделяем столбец с ФИО сотрудников предприятия в таблице. Кликаем по выделенному столбцу правой кнопкой мыши. Запускается контекстное меню. В блоке «Параметры вставки» выбираем пиктограмму «Значения», которая отображена в виде квадрата, содержащего цифры.
9. После этого действия, как видим, преобразованный вариант написания фамилий заглавными буквами будет вставлен в исходную таблицу. Теперь можно удалить диапазон, заполненный формулами, так как он нам больше не нужен. Выделяем его и кликаем правой кнопкой мыши. В контекстном меню выбираем пункт «Очистить содержимое».

После этого работу над таблицей по преобразованию букв в фамилиях сотрудников в прописные можно считать завершенной.

Урок: Мастер функций в Экселе

Способ 2: применение макроса

Решить поставленную задачу по преобразованию строчных букв в прописные в Excel можно также при помощи макроса. Но прежде, если в вашей версии программы не включена работа с макросами, нужно активировать эту функцию.

1. После того, как вы активировали работу макросов, выделяем диапазон, в котором нужно трансформировать буквы в верхний регистр. Затем набираем сочетание клавиш Alt+F11.
2. Запускается окно Microsoft Visual Basic. Это, собственно, редактор макросов. Набираем комбинацию Ctrl+G. Как видим, после этого курсор перемещается в нижнее поле.
3. Вводим в это поле следующий код:

   for each c in selection:c.value=ucase(c):next

   Затем жмем на клавишу ENTER и закрываем окно Visual Basic стандартным способом, то есть, нажав на кнопку закрытия в виде крестика в его правом верхнем углу.

4. Как видим, после выполнения вышеуказанных манипуляций, данные в выделенном диапазоне преобразованы. Теперь они полностью состоят из прописных букв.

Урок: Как создать макрос в Excel

Для того, чтобы сравнительно быстро преобразовать все буквы в тексте из строчных в прописные, а не терять время на его ручное введение заново с клавиатуры, в Excel существует два способа. Первый из них предусматривает использование функции ПРОПИСН. Второй вариант ещё проще и быстрее. Но он основывается на работе макросов, поэтому этот инструмент должен быть активирован в вашем экземпляре программы. Но включение макросов – это создание дополнительной точки уязвимости операционной системы для злоумышленников. Так что каждый пользователь решает сам, какой из указанных способов ему лучше применить.

Мы рады, что смогли помочь Вам в решении проблемы.

Задайте свой вопрос в комментариях, подробно расписав суть проблемы. Наши специалисты постараются ответить максимально быстро.

Помогла ли вам эта статья?

Да Нет

Не смотря на то, что Excel – табличный редактор и в первую очередь предназначен для работы с числовыми значениями, набор инструментов в нем для преобразования текстовых значений достаточно разнообразен. Задачи по изменению заглавных букв на буквы строчные и обратно могут быть решены разными способами.

Текстовые функции

Текстовых функций в Excel немногим больше двадцати, но используя их сочетания, можно произвести с текстом практически любые преобразования. Все текстовые функции можно найти на вкладке «Формулы», в группе кнопок «Библиотека функций», в меню кнопки «Текстовые». Также Вы можете ознакомиться с кратким описанием этих функций.

Как преобразовать строчные буквы в прописные?

КАК СДЕЛАТЬ ВСЕ БУКВЫ ПРОПИСНЫМИ

При помощи стандартной функции Excel «ПРОПИСН» можно все буквы в строке перевести в верхний регистр (сделать заглавными).

Как Сделать Все Первые Буквы Прописными

Стандартная функция Excel «ПРОПНАЧ» изменяет первые буквы в каждом слове со строчных на заглавные.

Как сделать первые буквы прописными

Комбинация встроенных в Excel функций «ПРОПИСН», «СЦЕПИТЬ», «ЛЕВСИМВ», «ПРАВСИМВ» и «ДЛСТР» позволяет привести только первые буквы к верхнему регистру.

Итоговая формула имеет вид «=СЦЕПИТЬ(ПРОПИСН(ЛЕВСИМВ(B2));ПРАВСИМВ(B2;ДЛСТР(B2)-1))», где B2 – это адрес ячейки с текстовым значением.

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

как сделать все буквы строчными

«СТРОЧН» из набора встроенных текстовых функций конвертирует все буквы в строчные.

кАК СДЕЛАТЬ ПЕРВЫЕ БУКВЫ СТРОЧНЫМИ

В некоторых случаях необходимо сделать строчной только первую букву.

«=СЦЕПИТЬ(СТРОЧН(ЛЕВСИМВ(B2));ПРАВСИМВ(B2;ДЛСТР(B2)-1))», где B2 – это адрес ячейки с исходным значением.

Использование сочетаний функций требует затрат времени, делает формулы громоздкими, снижает их восприятие и эффективность использования.

Пользовательские функции

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

Чтобы привести буквы нижнего регистра к верхнему, а буквы верхнего регистра к нижнему стандартными функциями Excel, придется серьезно потрудиться. Такого результата непросто достичь даже комбинацией стандартных функций, так как требуется циклический перебор всех символов.

Результат, который сложно получить стандартными функциями Excel, достаточно легко может быть достигнут при помощи функций пользовательских. Ниже приведен листинг пользовательской функции, написанной на Visual Basic for Application.

Эту функцию можно использовать, скопировав программный код в личную книгу макросов. Также, можно бесплатно скачать надстройку и установить её по инструкции. После установки надстройки функция будет добавлена в раздел «Пользовательские функции».

Готовое решение для быстрых преобразований текста

Как видно из вышеприведенных примеров, при помощи функций можно добиться практически любых результатов, но все это делается не так быстро как хотелось бы. Например, в Word аналогичные задачи решаются в два-три клика мыши при помощи функции «Регистр», меню которой вызывается кнопкой, удобно расположенной на вкладке «Главная».

Упростить решение задач связанных с изменением текстовых значений, ускорить обработку данных и при этом избежать ввода формул помогает многофункциональная надстройка для 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)))           Next           ConvertRegistr = sString       Else           ConvertRegistr = StrConv(sString, Tip)       End If   End Function

Как ею пользоваться, по шагам:

1. Открываете Excel, нажимаете Alt+F11, откроется окно Visual Basic.
2. Команда Insert/Module. В открывшееся поле вставляете текст.
3. Переходите в Excel, теперь в списке функций, в полном алфавитном перечне у вас появилась функция ConvertRegistr.
4. У этой функции два аргумента — ячейка и режим преобразования регистра. В тексте функции есть комментарии, какой режим обозначен какой цифрой. По сути она заменяет предыдущие три функции, а работает полным аналогом уже упоминавшейся команды «Регистр». Правда, есть нюанс — 4й пункт — «Как в предложениях» — работает только для одного предложения. Если кому нужно, пишите на мэйл, скину рабочий вариант, который переработает нормальный литературный текст.
5. Если вы хотите, чтобы функция всегда была под рукой, сохраните файл как надстройку Excel в папке Addins. У меня она находится по адресу: C:UsersuserAppDataRoamingMicrosoftAddIns.
6. Активируйте надстройку через Офис/Параметры Excel/Надстройки/Перейти в надстройки. Там появится окно, где надо будет поставить галочку напротив названия файла. Также возможно прописать макрос пребразования регистра в диапазонах, это вы сможете посмотреть .

Удачи в использовании!

«Глаза боятся, а руки делают»

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

Навигация по записям ← Сумма прописью в Excel Специальная вставка в Excel →