Как преобразовать все буквы в прописные [ВЕРХНИЙ РЕГИСТР]?
Категория: Basic
2012-09-12 15:58:21
code: #vba
iText = "ТексТ" ' "текст" iUpText = UCase(iText) ' Вариант I. iUpText = StrConv(iText, vbUpperCase) ' Or iUpText = StrConv(iText, 1) ' Вариант II. iUpText = Format(iText, ">") ' Вариант III.
Поделиться: