Возврат фокуса в тот же TextBox если он пустой

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

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

Возврат фокуса в тот же TextBox если он пустой (Макросы/Sub)

Shylo

Дата: Понедельник, 17.07.2023, 21:54 | Сообщение № 1

Группа: Проверенные

Ранг: Форумчанин

Сообщений: 171

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

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

Excel-2007; 2016

Добрый вечер. Застрял на решении простого вопроса, прошу помочь. Через форму с большим количеством TextBox_ов (некоторые необязательные, некоторые обязательные) на лист вносится информация. Переходы между ними производятся по Enter. В TextBox9 "Дата инспектирования" (обязательная информация) вводится дата без точек с последующим формированием строки к виду даты, затем осуществляется переход к ComboBox2 где производится выбор: принято - "Да", не принято - "Нет". Если "Да" вычисляется дата следующего инспектирования и вносится в TextBox10, если "Нет" в него ставится пробел. А застопорился я на том, что немогу вернуть фокус обратно в TextBox9 если он по ошибке остался пустой и нажат Enter. Конечно можно вернуть мышкой, но хочется работать только клавиатурой. Закрасить получается, а попытки вернуть фокус и из ComboBox2, и из отдельной процедуры по отлову Error_a, и подбором методов ComboBox_а - не получается. Помогите пожалуйста. Проверка "на пусто" по процедуре внесения в ячейки (cmdAdd) тут не подходить ввиду необходимости вычисления следующей даты. Файл-пример с кодом прилагаю.

К сообщению приложен файл: primer_kontrol_tekstboksa.zip (37.6 Kb)

Сообщение отредактировал Shylo - Понедельник, 17.07.2023, 22:02