Прескочи на основното съдържание

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

Автор: Кели Последна промяна: 2014-07-01

Тази статия ще говори за някои съвети за това как лесно да промените текстовите низове на всички главни букви в Microsoft Excel.

Да предположим, че трябва да промените текстовите низове в A1: A5 на главни букви, вижте следните екранни снимки:


стрелка син десен балон Променете текстовите низове на главни букви в Excel с функцията UPPER

Използването на горната функция на Microsoft Excel е лесно за промяна на текстови низове в главни букви в една клетка.

Въведете = ГОРНО (A1) в клетка C1 и натиснете клавиша Enter. След това съдържанието на "промяна на регистъра" в клетка A1 се копира и се променя на "промяна на регистър" в клетка C1. Вижте екранна снимка:

Изберете клетка C1 и можете да копирате формулата в други клетки, като плъзнете в долния десен ъгъл и пуснете надолу към други клетки.


стрелка син десен балон Променете текстовите низове на главни букви в Excel с VBA

Има код на VBA, който може да ви помогне да промените текстовия низ на главни букви в Excel.

1. Натиснете Alt + F11 за показване на Microsoft Visual Basic за приложения прозорец.

2. В прозореца щракнете Поставете > Модули за да покажете нов прозорец на модула, след това копирайте следния VBA код в прозореца на модула.

VBA: Променете текстов низ на главни букви в Excel.

Sub UCase()
'Upadateby20140701
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 = VBA.UCase(Rng.Value)
Next
End Sub

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

4. След като изберете, щракнете OK. Целият текстов низ в селекцията ще бъде променен на главни букви.


стрелка син десен балон Променете текстовите низове на главни букви в Excel с Kutools за Excel

Kutools за Excel's Промяна на делото инструментът може да ви помогне с всички текстови низове или букви до главни букви в диапазон на Microsoft Excel.

Kutools за Excel включва повече от 100 удобни инструмента на Excel. Безплатно изпробване без ограничение за 30 дни. Махни го сега.

Стъпка 1: Изберете диапазона, в който ще промените текстовите низове на главни букви.

Стъпка 2: Кликнете върху Kutools > Инструменти за текстове > Промяна на главни и малки букви.... Вижте екранна снимка:

Стъпка 3: В Промяна на делото диалоговия прозорец, проверете ГЛАВНА БУКВА и щракнете върху OK or Добавете Обява бутон. Вижте екранна снимка:

Тогава ще видите, че всички текстови низове в селекцията са променени на главни букви. Вижте екранна снимка:

Kutools за Excel's Промяна на делото инструментът може бързо да промени регистъра на текста на ГОРЕН, ДОЛЕН, ПРАВИЛЕН, Регистър на изречението и ПРЕВКЛЮЧВАНЕ НА ГЛАВЕН ГЛАВЕН. Кликнете, за да научите повече...


Сродни статии:

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!

 

Comments (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
The VBA was freaking awesome thanks a lot :lol: .
This comment was minimized by the moderator on the site
This is one the ways that i know it could be done with VBA Sub UPPER () Dim Addrr As Atring Addr = Intersect(ActiveSheet.UsedRange, Selection).Address Range(Addr) = _ Evaluate("IF(LEN(" & Addr & "),UPPER(" & Addr & "),"""")") End Sub
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations