Сценарий
У меня есть выпадающий список с именем customerGroup
, в результате которого после изменения будут вызваны другие подпрограммы.
Коды
Private Sub customerGroup_Change()
Application.ScreenUpdating = False
Call populateDependentCombobox
Application.ScreenUpdating = True
End Sub
Задача
Когда я набираю этот комбинированный список (вместо прокрутки списка с помощью мыши), его фокус меняется на рабочую книгу, прежде чем я на самом деле получаю правильное значение. Из-за этого часть набора текста происходит непосредственно в рабочей книге
Есть ли способ, с помощью которого я могу сосредоточиться на самом комбобоксе? Я попробовал следующий способ. Но это не работает
Private Sub customerGroup_Change()
Application.ScreenUpdating = False
customerGroup.SetFocus
Call populateDependentCombobox
customerGroup.SetFocus
Application.ScreenUpdating = True
End Sub