Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Смена раскладки клавиатуры для разных TextBox - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Смена раскладки клавиатуры для разных TextBox
Смена раскладки клавиатуры для разных TextBox
Zonda Дата: Воскресенье, 20.01.2013, 01:53 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Доброе время суток! Изучаю VBA, но только начал (часто нужен для себя), и знаний не хватает на некоторые вещи (+что нахожу в интернете). А т.к. необходимость макроса бОльшая, чем скорость изучения, поэтому обращаюсь к вам. Прошу помочь или же сделать, если не сложно...

Задача такая:
Создал форму, в ней есть 2 TextBox. В 1 поле я ввожу русский язык, в другое - например, английский. Вот необходимо, чтобы при выборе соответствующего поля автоматически менялся язык на соответствующий (русский или английский). Пробовал через .Active и .SetFocus, но знаний не хватает. И ещё - чтобы активный язык отображался в поле ниже, желательно с флагом страны. Может быть есть и готовые примеры, но не нашёл.

Прикрепил файл, визуально всё же понятнее... Спасибо.
К сообщению приложен файл: r1.xlsm (19.4 Kb)
 
Ответить
СообщениеДоброе время суток! Изучаю VBA, но только начал (часто нужен для себя), и знаний не хватает на некоторые вещи (+что нахожу в интернете). А т.к. необходимость макроса бОльшая, чем скорость изучения, поэтому обращаюсь к вам. Прошу помочь или же сделать, если не сложно...

Задача такая:
Создал форму, в ней есть 2 TextBox. В 1 поле я ввожу русский язык, в другое - например, английский. Вот необходимо, чтобы при выборе соответствующего поля автоматически менялся язык на соответствующий (русский или английский). Пробовал через .Active и .SetFocus, но знаний не хватает. И ещё - чтобы активный язык отображался в поле ниже, желательно с флагом страны. Может быть есть и готовые примеры, но не нашёл.

Прикрепил файл, визуально всё же понятнее... Спасибо.
Автор - Zonda
Дата добавления - 20.01.2013 в 01:53
ikki Дата: Воскресенье, 20.01.2013, 01:56 | Сообщение № 2
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
vba change keyboard layout
вы об этом?

помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

Сообщение отредактировал ikki - Воскресенье, 20.01.2013, 01:57
 
Ответить
Сообщениеvba change keyboard layout
вы об этом?
Автор - ikki
Дата добавления - 20.01.2013 в 01:56
Zonda Дата: Воскресенье, 20.01.2013, 03:40 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Да, но по данному запросу нашёл только 1 линк, который частично помог мне для установки языка...Но реализовать задуманное не помогает.
 
Ответить
СообщениеДа, но по данному запросу нашёл только 1 линк, который частично помог мне для установки языка...Но реализовать задуманное не помогает.
Автор - Zonda
Дата добавления - 20.01.2013 в 03:40
ikki Дата: Воскресенье, 20.01.2013, 03:54 | Сообщение № 4
Группа: Друзья
Ранг: Старожил
Сообщений: 1906
Репутация: 504 ±
Замечаний: 0% ±

Excel 2003, 2010
ничего не понимаю.
если вы смогли разобраться с переключением языка, то что вам ещё нужно для "реализации задуманного"?
пс. флажки - это из разряда "рюшечек".
реализуемо, конечно, но начинать изучать VBA надо всё же не с этого, имхо.

помощь по Excel и VBA
ikki@fxmail.ru, icq 592842413, skype alex.ikki

Сообщение отредактировал ikki - Воскресенье, 20.01.2013, 03:59
 
Ответить
Сообщениеничего не понимаю.
если вы смогли разобраться с переключением языка, то что вам ещё нужно для "реализации задуманного"?
пс. флажки - это из разряда "рюшечек".
реализуемо, конечно, но начинать изучать VBA надо всё же не с этого, имхо.
Автор - ikki
Дата добавления - 20.01.2013 в 03:54
Zonda Дата: Воскресенье, 20.01.2013, 12:29 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Флажки мне нужны не для обучения, данный макрос нужен для других целей. Для реализации задуманного, например, я не знаю как "считать" актуальную раскладку, как определить, что какой-то текстбокс активен...
 
Ответить
СообщениеФлажки мне нужны не для обучения, данный макрос нужен для других целей. Для реализации задуманного, например, я не знаю как "считать" актуальную раскладку, как определить, что какой-то текстбокс активен...
Автор - Zonda
Дата добавления - 20.01.2013 в 12:29
nilem Дата: Воскресенье, 20.01.2013, 16:49 | Сообщение № 6
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
попробуйте так (картинок с флагами не нашел)
К сообщению приложен файл: r2.xlsm (32.4 Kb)

Яндекс.Деньги 4100159601573
 
Ответить
Сообщениепопробуйте так (картинок с флагами не нашел)
Автор - nilem
Дата добавления - 20.01.2013 в 16:49
Zonda Дата: Понедельник, 21.01.2013, 01:43 | Сообщение № 7
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Спасибо большое! Работает!
Но, минус в том, что, если я перемещаюсь между полями через Enter или Tab - язык не меняется, только по мышке.
Ещё не понял, почему с переключением языка активно меняет свой статус NumLock...
 
Ответить
СообщениеСпасибо большое! Работает!
Но, минус в том, что, если я перемещаюсь между полями через Enter или Tab - язык не меняется, только по мышке.
Ещё не понял, почему с переключением языка активно меняет свой статус NumLock...
Автор - Zonda
Дата добавления - 21.01.2013 в 01:43
Pupil Дата: Понедельник, 21.01.2013, 02:07 | Сообщение № 8
Группа: Гости
Цитата (Zonda)
Но, минус в том, что, если я перемещаюсь между полями через Enter или Tab - язык не меняется, только по мышке.

Исследование возможностей игры духовных лиц на бесструнных инструментах. smile
 
Ответить
Сообщение
Цитата (Zonda)
Но, минус в том, что, если я перемещаюсь между полями через Enter или Tab - язык не меняется, только по мышке.

Исследование возможностей игры духовных лиц на бесструнных инструментах. smile
Автор - Pupil
Дата добавления - 21.01.2013 в 02:07
nilem Дата: Понедельник, 21.01.2013, 09:32 | Сообщение № 9
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация: 563 ±
Замечаний: 0% ±

Excel 2013, 2016
Цитата (Zonda)
...почему с переключением языка активно меняет свой статус NumLock...

Видимо, SendKeys так влияет - можно попробовать использовать др. клавиши
Или так (см. файл)
Для перемещения по Enter или Tab поэкспериментируйте с др. событиями для текстбоксов, напр. TextBox1_Exit
К сообщению приложен файл: r3.xlsm (32.9 Kb)

Яндекс.Деньги 4100159601573
 
Ответить
Сообщение
Цитата (Zonda)
...почему с переключением языка активно меняет свой статус NumLock...

Видимо, SendKeys так влияет - можно попробовать использовать др. клавиши
Или так (см. файл)
Для перемещения по Enter или Tab поэкспериментируйте с др. событиями для текстбоксов, напр. TextBox1_Exit
Автор - nilem
Дата добавления - 21.01.2013 в 09:32
Zonda Дата: Вторник, 22.01.2013, 02:17 | Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Благодарю! Буду думать! А пока буду пользоваться Вашим вариантом.
 
Ответить
СообщениеБлагодарю! Буду думать! А пока буду пользоваться Вашим вариантом.
Автор - Zonda
Дата добавления - 22.01.2013 в 02:17
alex77755 Дата: Вторник, 22.01.2013, 09:03 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 362
Репутация: 64 ±
Замечаний: 0% ±

TextBox2_Enter рулит

Могу помочь в VB6, VBA
Alex77755@mail.ru
 
Ответить
СообщениеTextBox2_Enter рулит
Автор - alex77755
Дата добавления - 22.01.2013 в 09:03
RAN Дата: Вторник, 22.01.2013, 20:38 | Сообщение № 12
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Цитата (nilem)
Цитата (Zonda писал(а)):
...почему с переключением языка активно меняет свой статус NumLock...
Видимо, SendKeys так влияет - можно попробовать использовать др. клавиши


Сегодня проверил - точно!
А я все гадал, почему отключается!

Быть или не быть, вот в чем загвоздка!
 
Ответить
Сообщение
Цитата (nilem)
Цитата (Zonda писал(а)):
...почему с переключением языка активно меняет свой статус NumLock...
Видимо, SendKeys так влияет - можно попробовать использовать др. клавиши


Сегодня проверил - точно!
А я все гадал, почему отключается!
Автор - RAN
Дата добавления - 22.01.2013 в 20:38
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Смена раскладки клавиатуры для разных TextBox
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!