Все еще воюю с формами... Описываю ситуацию. Есть несколько комбобоксов, в которых выбирается валюта (рубль, доллар или евро, соответственно). Если хоть один из комбобоксов не равен рублю - нужно, чтобы отображался текстбокс, в который будет вводиться курс. Подскажите пожалуйста, как реализовать.
Прописываю отдельно для каждых комбобоксов методом combobox.change(), но это неверно, т.к. если следующий выбрать рублем - оно скроет нужный текстбокс.
Прошу модераторов сильно не пинать. :)
Буду признателен!
Добрый день!
Все еще воюю с формами... Описываю ситуацию. Есть несколько комбобоксов, в которых выбирается валюта (рубль, доллар или евро, соответственно). Если хоть один из комбобоксов не равен рублю - нужно, чтобы отображался текстбокс, в который будет вводиться курс. Подскажите пожалуйста, как реализовать.
Прописываю отдельно для каждых комбобоксов методом combobox.change(), но это неверно, т.к. если следующий выбрать рублем - оно скроет нужный текстбокс.
Private Sub SetTextVisible() TextBox1.Visible = ComboBox1.ListIndex Or ComboBox2.ListIndex End Sub
Private Sub ComboBox1_Click() SetTextVisible End Sub Private Sub ComboBox2_Click() SetTextVisible End Sub
Private Sub UserForm_initialize() With ComboBox1 .AddItem "Руб." .AddItem "$" .AddItem "€" .ListIndex = 0 End With With ComboBox2 .AddItem "Руб." .AddItem "$" .AddItem "€" .ListIndex = 0 End With End Sub
[/vba]
Добрый вечер!
[vba]
Код
Private Sub SetTextVisible() TextBox1.Visible = ComboBox1.ListIndex Or ComboBox2.ListIndex End Sub
Private Sub ComboBox1_Click() SetTextVisible End Sub Private Sub ComboBox2_Click() SetTextVisible End Sub
Private Sub UserForm_initialize() With ComboBox1 .AddItem "Руб." .AddItem "$" .AddItem "€" .ListIndex = 0 End With With ComboBox2 .AddItem "Руб." .AddItem "$" .AddItem "€" .ListIndex = 0 End With End Sub
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
