автоматическая замена первой буквы на заглавную

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

автоматическая замена первой буквы на заглавную (автоматическая замена первой буквы на заглавную)

автоматическая замена первой буквы на заглавную

Лехаа

Дата: Вторник, 07.08.2012, 15:16 | Сообщение № 1

Группа: Пользователи

Ранг: Участник

Сообщений: 68

Репутация: 4 ±

Замечаний: 0% ±

Добрый день, можно ли с помощью макроса сделать авто исправление с прописных букв на заглавные (в диапазонах G:G и H:H вводятся Фамилии и Имена)

Ответить

Gustav

Дата: Вторник, 07.08.2012, 15:24 | Сообщение № 2

Группа: Админы

Ранг: Участник клуба

Сообщений: 2797

Репутация: 1161 ±

Замечаний: ±

начинал с Excel 4.0, видел 2.1

Quote (Лехаа)

исправление с прописных букв на заглавные

Прописные и заглавные - это одно и то же. Задача решена smile

МОИ: Ник, Tip box: 41001663842605

Ответить

_Boroda_

Дата: Вторник, 07.08.2012, 15:35 | Сообщение № 3

Группа: Админы

Ранг: Местный житель

Сообщений: 16715

Репутация: 6504 ±

Замечаний: ±

2003; 2007; 2010; 2013 RUS

Формулой =ПРОПНАЧ(H1)
макросом
[vba]

Code

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column = 7 Or Target.Column = 8 Then
Application.EnableEvents = 0
Target = WorksheetFunction.Proper(Target)
End If
Application.EnableEvents = 1
End Sub

[/vba]

К сообщению приложен файл: _3.xlsm (11.6 Kb)

Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995