Уважаемые гуру!
Такая ситуация. В Модуль1 объявил глобальную переменную push. Есть форма, там формируется список в ComboBox1. Далее выбираю значение из комбобокса, присваиваю его значение глобальной переменной push по событию ComboBox1_Change(). Пока нахожусь в коде формы, значение соответствует выбранному в комбобоксе. Затем идет возврат на Модуль1. Значение push обнуляется. Подскажите плиз, что не так делаю. Заранее благодарю.
Код Модуль1
Такая ситуация. В Модуль1 объявил глобальную переменную push. Есть форма, там формируется список в ComboBox1. Далее выбираю значение из комбобокса, присваиваю его значение глобальной переменной push по событию ComboBox1_Change(). Пока нахожусь в коде формы, значение соответствует выбранному в комбобоксе. Затем идет возврат на Модуль1. Значение push обнуляется. Подскажите плиз, что не так делаю. Заранее благодарю.
Код Модуль1
Код |
---|
Option Explicit Public push As String Private Sub Сформировать отчет() Пушеры.Show push = Пушеры.ComboBox1.Value End Sub Код формы Public Sub ComboBox1_Change() push = Me.ComboBox1.Value Пушеры.Hide End Sub Private Sub UserForm_Initialize() With Me.ComboBox1 .AddItem "Ласточкин Владимир" .AddItem "Меташев Станислав" .AddItem "Рощупкина Олеся" .AddItem "Трофимова Юлия" .AddItem "Ярмоленко Яна" End With End Sub |