Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > заглавные буквы сделать маленькими


Автор: Chewits 3.4.2006, 14:47
есть некий текст, в котором необходимо все буквы верхнего регистра обратить в нижний, т.е чтоб всё маленькими буквами было. в worde, exele на русском и англ. языках, в т.ч. буква Ё.

Автор: ~FoX~ 3.4.2006, 15:01
Юзаем хэлп
Код

Dim UpperCase, LowerCase
Uppercase = "Hello World 1234"   ' String to convert.
Lowercase = Lcase(UpperCase)   ' Returns "hello world 1234".

Автор: Chewits 7.4.2006, 18:39
только щас добрался...
спасибо. сегодня открыл впервые VBA, потыкал-потыкал, вот что вышло:

Sub inlower()
Selection.WholeStory
Selection.Text = Lcase(Selection.Text)
End Sub

это вёрдовский макрос. вроде работает, только в конце документа добавляет лишнюю строку, не знаю как избавиться...

а с экселем посложнее наверно: там тык не прошёл по аналогии, может кто подскажет?..

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)