Знамо како претворити мали текст у велика слова на радном листу, али како претворити мала слова у велика помоћу ВБА? Док аутоматизујете процес, можда ћете имати потребу да текст на листу претворите у велика слова.
На радном листу користимо УППЕР функцију за мала и велика слова. У ВБА имамо сличну функцију. Назив функције је УЦасе. УЦасе означава УпперЦасе.
Синтакса функције УЦасе:
= УЦасе (Низ)
Евонизможе бити чврсти кодни низ или референца на стринг.
Дакле, сада када знамо за функцију која се може користити за промену малих слова у велике, употребимо је у практичном примеру.
Претворите сав текст на листу у велика слова
Овде имамо једноставан задатак да сав текст датог листа у радној свесци претворимо у велика слова. Л
Да бисте добили код за претварање текста у велика слова; морамо да следимо доле наведене кораке да бисмо покренули ВБ едитор
- Кликните на картицу Девелопер
- Из групе кодова изаберите Висуал Басиц
Копирајте доњи код у модул радног листа (није нормалан модул).
Суб УпперЦасеЦоде1 ()
Апплицатион.СцреенУпдатинг = Нетачно
Дим Рнг Ас Ранге
Дим ц Ас Ранге
На Грешка Настави даље
Сет Рнг = Целлс.СпециалЦеллс (клЦеллТипеЦонстантс, 2)
За сваки ц У Рнг
ц.Валуе = УЦасе (ц.Валуе)
Следеће ц
Апплицатион.СцреенУпдатинг = Тачно
Енд Суб
Како то функционише?
Горњи код је написан у модулу схеет1. Горњи код ће претворити сав текст на листу1 у велика слова.
Главне линије у горњем коду су:
Сет Рнг = Целлс.СпециалЦеллс (клЦеллТипеЦонстантс, 2)
За сваки ц У Рнг
ц.Валуе = УЦасе (ц.Валуе)
Следеће ц
Овде користимо функцију СпециалЦеллс класе Целлс и прослеђујемо аргументе клЦеллТипеЦонстантс. Враћа набрајање ћелија и опсега који садрже константе.
Затим користимо фор петљу за понављање сваке ћелије у набрајању. Затим мењамо вредност ћелије помоћу функције УЦасе.
Ево изјавец.Валуе = УЦасе (ц.Валуе) ажурира вредности у свакој ћелији великим словима.
Пример 2: Претворите текст колоне А у велика слова.
У овом примеру имамо задатак да конвертујемо само текстуалну колону А. Можда ћете желети да то учините када одређене колоне садрже посебан текст који мора бити само у великим словима.
Суб УпперЦасеЦоде2 () Апплицатион.СцреенУпдатинг = Нетачно
Дим целл Ас Ранге
За сваку ћелију у опсегу ("$ А $ 1:" & Опсег ("$ А $ 1"). СпециалЦеллс (клЛастЦелл). Адреса)
Ако је Лен (ћелија)> 0 Тада је ћелија = УЦасе (ћелија)
Следећа ћелија
Апплицатион.СцреенУпдатинг = Тачно
Енд Суб
Код је скоро исти као у претходном примеру. Једина промена коју имамо су ове линије:
За сваку ћелију у опсегу ("$ А $ 1:" & Опсег ("$ А $ 1"). СпециалЦеллс (клЛастЦелл). Адреса)
Ако је Лен (ћелија)> 0 Тада је ћелија = УЦасе (ћелија)
Следећа ћелија
Овде стварамо динамички опсег помоћу линије Опсег ("$ А $ 1:" & Опсег ("$ А $ 1"). СпециалЦеллс (клЛастЦелл). Адреса). Ова линија ствара опсег почевши од ћелије А1 до последње ћелије која садржи било коју вредност у колони А.
Затим понављамо сваку ћелију и ажурирамо је великим низовима.
Датотеку можете преузети испод.
Преузми - ВБА за претварање текста из малих у велика слова - клсм
Па да, момци, овако можете надоградити мали текст у велики. Надам се да сам довољно објаснио. Ако имате било каквих недоумица у вези са овим чланком или било којим другим питањем везаним за ВБА. Питајте ме у одељку за коментаре испод.
Како се користи функција ТРИМ у програму Екцел: Функција ТРИМ се користи за обрезивање низова и чишћење свих задњих или водећих размака од низа. Ово нам много помаже у процесу чишћења података.
Како се користи функција ЦЛЕАН у програму Екцел: Функција Цлеан се користи за чишћење неисписивих знакова из низа. Ова функција се углавном користи са функцијом ТРИМ за чишћење увезених страних података.
Замените текст са краја низа почевши од променљиве позиције: Да бисмо заменили текст са краја низа, користимо функцију РЕПЛАЦЕ. Функција РЕПЛАЦЕ користи позицију текста у низу да би је заменила.
Како да проверите да ли низ садржи један од многих текстова у Екцелу: Користимо ову формулу да бисмо проверили да ли низ садржи било који од више текста. Користимо функцију СУМ да збројимо сва подударања, а затим извршимо логику да проверимо да ли низ садржи било који од више низова.
Бројање ћелија које садрже одређени текст: Једноставна функција ЦОУНТИФ ће учинити магију. За бројање више ћелија које садрже дати низ користимо џокер оператор са функцијом ЦОУНТИФ.
Екцел ЗАМЕНИ вс ЗАМЕНИ функција: Функције РЕПЛАЦЕ и СУБСТИТУТЕ су најчешће погрешно схваћене функције. Да бисмо пронашли и заменили дати текст користимо функцију ЗАМЕНА. Где се РЕПЛАЦЕ користи за замену више знакова у низу …
Популарни чланци:
50 Екцел пречица за повећање продуктивности | Убрзајте свој задатак. Ових 50 пречица ће учинити да радите још брже на Екцелу.
Како се користи Екцел ВЛООКУП функција| Ово је једна од најчешће кориштених и популарних функција програма Екцел која се користи за тражење вриједности из различитих распона и листова.
Како користити Екцел ЦОУНТИФ функција| Бројте вредности са условима користећи ову невероватну функцију. Не морате да филтрирате податке да бисте рачунали одређене вредности. Цоунтиф функција је неопходна за припрему ваше контролне табле.
Како се користи функција СУМИФ у програму Екцел | Ово је још једна битна функција контролне табле. Ово вам помаже да сумирате вредности под одређеним условима.