Итак, у меня есть список со значениями в нем. Цель состоит в том, чтобы щелкнуть по элементу, а затем заполнить отдельный список соответствующими данными. Я могу обработать совпадение и заполнение для второго списка, но сейчас мой код не возвращает значение, когда я выбираю элемент в первом списке. Я вижу, что мое значение не возвращается, потому что код разрывается на строку, где я устанавливаю значение ячейки для переменной «name», которую я использую:
Private Sub ListBox1_Click()
Dim iCnt As Long
Dim name As Variant
For iCnt = 0 To Me.ListBox1.ListCount - 1
If ListBox1.Selected(iCnt) = True Then
name = Me.ListBox1.List(iCnt)
ThisWorksheet.Sheets("Program").Range("K6").Value = name
End If
'subsequent match and populate will go here.
End Sub
Как исправитьмой синтаксис для возврата строкового значения выбранного элемента, чтобы я мог затем использовать его для моего следующего совпадения?