Ние знаем как да конвертираме текст с главни букви в главен текст на работен лист, но как да преобразуваме малки букви в главни с помощта на VBA? Докато автоматизирате процеса, може да се наложи да преобразувате текста на листа в главни букви.
На работния лист използваме функцията UPPER за малки и големи букви. Във VBA имаме подобна функция. Името е функцията UCase. UCase означава UpperCase.
Синтаксис на функцията UCase:
= UCase (Низ)
Тукнизможе да бъде твърд кодов низ или препратка към низ.
Така че сега, когато знаем за функцията, която може да се използва за промяна на малки букви в главен низ, нека я използваме в практически пример.
Преобразувайте целия текст на лист в главни букви
Тук имаме проста задача да преобразуваме целия текст на даден лист в работна книга в главни букви. L
За да получите кода за преобразуване на текст в главни букви; трябва да следваме стъпките по -долу, за да стартираме VB редактор
- Кликнете върху раздела Разработчик
- От групата Кодове изберете Visual Basic
Копирайте кода по -долу в модул на работен лист (не е нормален модул).
Sub UpperCaseCode1 ()
Application.ScreenUpdating = False
Dim Rng As Range
Dim c като диапазон
На грешка възобновяване на следващо
Задайте Rng = клетки. Специални клетки (xlCellTypeConstants, 2)
За всеки c В Rng
c.Value = UCase (c.Value)
Следващ c
Application.ScreenUpdating = Вярно
End Sub
Как работи?
Горният код е записан в модула sheet1. Горният код ще преобразува целия текст на лист1 в главни букви.
Основните редове в горния код са:
Задайте Rng = клетки. Специални клетки (xlCellTypeConstants, 2)
За всеки c В Rng
c.Value = UCase (c.Value)
Следващ c
Тук използваме функцията SpecialCells на клас Cells и предаваме аргументите xlCellTypeConstants. Той връща изброяване на клетки и диапазони, които съдържат константи.
След това използваме цикъла for, за да повторим всяка клетка при изброяване. След това променяме стойността на тази клетка с помощта на функцията UCase.
Ето изявлениетоc.Value = UCase (c.Value) актуализира стойностите във всяка клетка с главен текст.
Пример 2: Преобразуване на текст от колона А в главни букви.
В този пример имаме задачата да преобразуваме само текстова колона А. Може да искате да направите това, когато конкретни колони съдържат специален текст, който трябва да бъде само с главни букви.
Sub UpperCaseCode2 () Application.ScreenUpdating = False
Затъмняване на клетката като обхват
За всяка клетка в диапазона ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell). Адрес)
Ако Len (клетка)> 0 Тогава клетка = UCase (клетка)
Следващата клетка
Application.ScreenUpdating = Вярно
End Sub
Кодът е почти същият като предишния пример. Единствената промяна, която имаме, са тези редове:
За всяка клетка в диапазона ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell). Адрес)
Ако Len (клетка)> 0 Тогава клетка = UCase (клетка)
Следващата клетка
Тук създаваме динамичен диапазон, използвайки линията Range ("$ A $ 1:" & Range ("$ A $ 1"). SpecialCells (xlLastCell). Адрес). Този ред създава диапазон, започващ от клетка А1 до последната клетка, която съдържа всяка стойност в колона А.
След това преглеждаме всяка клетка и я актуализираме с главни низове.
Можете да изтеглите файла по -долу.
Изтегляне - VBA за преобразуване на текст от малки в главни букви - xlsm
Така че да, момчета, това е начинът, по който можете да актуализирате текст с малки букви до текст с главни букви. Надявам се да съм бил достатъчно обяснителен. Ако имате някакви съмнения относно тази статия или друго запитване, свързано с VBA. Попитайте ме в секцията за коментари по -долу.
Как да използвате функцията TRIM в Excel: Функцията TRIM се използва за подрязване на низове и почистване на всички крайни или водещи пространства от низ. Това ни помага много в процеса на почистване на данни.
Как да използвате функцията CLEAN в Excel: Функцията Clean се използва за почистване на непечатващи се символи от низ. Тази функция се използва най -вече с функцията TRIM за почистване на внесени чужди данни.
Заменете текст от края на низ, започвайки от променлива позиция: За да заменим текст от края на низ, използваме функцията REPLACE. Функцията REPLACE използва позицията на текста в низ, за да го замени.
Как да проверите дали низ съдържа един от многото текстове в Excel: За да проверим дали низ съдържа някой от множество текст, използваме тази формула. Използваме функцията SUM, за да обобщим всички съвпадения и след това изпълняваме логика, за да проверим дали низът съдържа някой от множеството низове.
Преброяване на клетки, които съдържат определен текст: Една проста функция COUNTIF ще направи магията. За да преброим броя на множество клетки, които съдържат даден низ, използваме заместващия оператор с функцията COUNTIF.
Excel REPLACE vs SUBSTITUTE функция: Функциите REPLACE и SUBSTITUTE са най -неразбраните функции. За да намерим и заменим даден текст, използваме функцията SUBSTITUTE. Когато REPLACE се използва за замяна на редица знаци в низ …
Популярни статии:
50 преки пътища в Excel за повишаване на вашата производителност | Бъдете по -бързи в задачата си. Тези 50 преки пътища ще ви накарат да работите още по -бързо в Excel.
Как да използвате функцията Excel VLOOKUP| Това е една от най -използваните и популярни функции на excel, която се използва за търсене на стойност от различни диапазони и листове.
Как да използвате Excel COUNTIF функция| Пребройте стойностите с условия, използвайки тази невероятна функция. Не е необходимо да филтрирате данните си, за да броите конкретни стойности. Функцията Countif е от съществено значение за подготовката на вашето табло.
Как да използвате функцията SUMIF в Excel | Това е друга основна функция на таблото. Това ви помага да обобщите стойностите при конкретни условия.