OnKey с русскими символами - Microsoft Office Excel

Aiden · 01.02.2010, 16:27

Такая проблема - при использовании в нижеприведенном коде английских символов все нормально и работоспособно, при вводе русских символов - выдает ошибку 1004

Кто-нибудь знает как это лечить?

П.С. Код :

Application.OnKey "^{Q}", "rep"
Application.OnKey "^{Й}", "rep"

EducatedFool · 01.02.2010, 17:14

Для начала внимательно читаем справку по методу OnKey
Видим, что внутри фигурных скобок {} пишутся названия спец.клавиш типа ENTER, PGDN и т.д.

А потом пишем:

Код:

Sub test()
    Application.OnKey "^q", "rep"
End Sub

И не надо никаких русских букв - макрос запустится при нажатии Ctrl + Q при любой раскладке клавиатуры.

alvazor · 01.02.2010, 17:30

Есть забавный вариант - когда-то по незнанию использовал -)
Воспользуйтесь созданием макроса через Сервис - Макросы - Начать запись
В окне создания нового макроса введите свое название и нужную букву в русском регистре, потом что-нить запишите, остановите запись и сохраните файл. Появится новый модуль с введенным Вами именем, и редактируйте его, как хотите. На сочетание он будет работать! Но как это Excel делает, я не знаю....

01.02.2010, 16:27	#1
Aiden Пользователь Регистрация: 12.09.2007 Сообщений: 34	OnKey с русскими символами Такая проблема - при использовании в нижеприведенном коде английских символов все нормально и работоспособно, при вводе русских символов - выдает ошибку 1004 Кто-нибудь знает как это лечить? П.С. Код : Application.OnKey "^{Q}", "rep" Application.OnKey "^{Й}", "rep" Последний раз редактировалось Aiden; 01.02.2010 в 16:34.

01.02.2010, 17:14	#2
EducatedFool Программист VBA СуперМодератор Регистрация: 13.07.2008 Сообщений: 6,856	Для начала внимательно читаем справку по методу OnKey Видим, что внутри фигурных скобок {} пишутся названия спец.клавиш типа ENTER, PGDN и т.д. А потом пишем: Код: `Sub test() Application.OnKey "^q", "rep" End Sub` И не надо никаких русских букв - макрос запустится при нажатии Ctrl + Q при любой раскладке клавиатуры. __Полезные надстройки для Excel. Парсинг сайтов и файлов. Макросы любой сложности на заказ. Мониторинг цен конкурентов

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
SMS русскими буквами	nimf	Общие вопросы Delphi	10	13.02.2010 22:23
Вопрос по Application.Onkey!!!	Klim Bassenger	Microsoft Office Excel	5	07.07.2009 11:30
Работа с русскими символами...	Sota	Помощь студентам	5	31.05.2008 18:44

01.02.2010, 17:30	#3
alvazor Форумчанин Регистрация: 02.07.2009 Сообщений: 122	Есть забавный вариант - когда-то по незнанию использовал -) Воспользуйтесь созданием макроса через Сервис - Макросы - Начать запись В окне создания нового макроса введите свое название и нужную букву в русском регистре, потом что-нить запишите, остановите запись и сохраните файл. Появится новый модуль с введенным Вами именем, и редактируйте его, как хотите. На сочетание он будет работать! Но как это Excel делает, я не знаю....