Vba Excel Можно ли выбрать значение из пользовательской формы, которое показывает части таблицы?

Question

Во-первых, извините, если название кажется запутанным, но я не смог найти лучшего способа объяснить это.Итак, у меня есть этот код:

 Private Sub UserForm_Initialize()

Application.ScreenUpdating = False


Sheets("Máquinas").Select


With Lista2

.ColumnCount = 9
.ColumnWidths = "80;0;200;0;0;0;0;0;50"

.RowSource = Sheets("Máquinas").Range("A1:U300").Address

End With


Sheets("Programa").Select

Application.ScreenUpdating = True


End Sub

У меня есть пользовательская форма (назовем это form1), где я регистрирую что-то.Однако существует список потенциальных переменных, с которыми пользователь может ознакомиться, прежде чем что-то регистрировать в этой форме1.Поэтому у меня есть кнопка в этой пользовательской форме, которая вызывает userform2 (назовем ее form2. Код выше взят из form2).Эта форма2 показывает определенные части таблицы, в которой у меня есть переменные (я думаю, что это список или что-то вроде этого, в основном пустой квадрат, который заполняется информацией, когда я запускаю код).Мой вопрос заключается в том, возможно ли организовать какое-то взаимодействие, при котором, когда пользователь щелкает или дважды щелкает параметр внутри формы 2, он автоматически копируется в текстовое поле в форме 1?

Answer 1

В форму 2 добавьте это

Private Sub ListBox1_Click()
If Me.ListBox1.ListIndex > -1 Then
   UserForm1.Controls("Textbox1").Value = Me.ListBox1.Column(2)

End If
End Sub

Предполагается, что список имеет имя Listbox1, первая пользовательская форма называется UserForm1, а текстовое поле называется Textbox1.Это получает значение второго столбца, когда вы нажимаете на поле со списком и помещает его в текстовое поле в другой форме