Страница 1 из 1
игнорирование ввода на кирилице в Excel
Добавлено: 26 июл 2010, 17:20
kooleer
Приветствую Вас форумчане.
У меня вот такой вопросик, возможно ли сделать так, чтобы в столбец вводились текстовые данные только на английском, а если пытались бы ввести кириллицу,то Excel бы ругался и не давал??
Подскажите кто сможет.
заранее спасибо))
Re: игнорирование ввода на кирилице в Excel
Добавлено: 26 июл 2010, 19:00
VictorM
Re: игнорирование ввода на кирилице в Excel
Добавлено: 26 июл 2010, 23:32
nilem
Можно так попробовать. На кириллицу ругаться не будем, а просто отменяем ввод:
Код: Выделить всё
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [B1:B5]) Is Nothing Then Exit Sub
If LCase(Target) Like "*[а-я]*" Then
With Application
.EnableEvents = False: .Undo: .EnableEvents = True
End With
End If
End Sub
Re: игнорирование ввода на кирилице в Excel
Добавлено: 27 июл 2010, 12:03
kooleer
спасибо большое , что откликнулись на зов о помощи,но...
что то у меня ничего не получается
((((((
Ваш nilem макрос у меня не хочет работать((
а у вас VictorM по ссылке там работа с Userform
догнать чёт не могу((
попробую ещё раз обьяснить ситуацию.Мможет есть другой какой выход?
В xls файле, в столбце вводятся данные и должны они быть на латинеце, но бывает вводят их на кирилице, т.е. буква похожие( пример C англ. или С русск.)
Так вот хотелось бы, чтобы при вводе на русском, чтобы Excel не разришал такого рода ввод.
Гляньте плз ещё разок.
Re: игнорирование ввода на кирилице в Excel
Добавлено: 27 июл 2010, 14:18
nilem
kooleer писал(а):Ваш nilem макрос у меня не хочет работать((
Две самые вероятные причины:
1. Этот код должен быть
в модуле листа (того листа, где вводим латиницу/кириллицу), проверяет ввод в ячейках В1:В5 (это для примера, можно записать любой другой диапазон)
Про модули листа и др. можно посмотреть здесь
http://excel-vba.ru/Tips_What_Module.html
2. Не включены макросы. Как включить - здесь
http://excel-vba.ru/Tips_Macro_Not_Work.html
Если все Ок, то должон работать.
Re: игнорирование ввода на кирилице в Excel
Добавлено: 27 июл 2010, 14:56
kooleer
Огромное Вам спасибо nilem
Вы были правы, вставил макрос в лист и всё заработало.