Vb.net – searchExcel文件的值

我有几个combobox的表单。 第一个combobox添加基于Excel表中每一行的项目。

Public Sub FetchExcelValues(ByVal ControlType As String, ByVal control As Object, ByVal xlApp As Object, ByVal xlWorkBook As Object, ByVal xlWorkSheet As Object, ByVal column As String, ByVal row As Integer) Dim iTeller = row Dim tekst As String Do tekst = xlWorkSheet.Cells(iTeller, column).Value If tekst <> "" Then If ControlType = "Tekstboks" Then control.text = tekst End If If ControlType = "Combobox" Then control.Items.Add(tekst) End If If ControlType = "Label" Then control.text = tekst End If End If iTeller = iTeller + 1 Loop Until tekst = "" End Sub 

这基本上读取指定列中的每个单元格,直到它到达一个空白单元格。 然后它将每个单元格的值并将其作为项目添加到第一个combobox。 现在,接下来要做的就是从这个combobox中选取一个项目,然后在另一个工作表中寻找匹配项。 当它find匹配的单元格时,它应该从匹配的同一行的B列中选取值。 也可能有不止一个匹配,所以每次find一个匹配,我想要拿起同一行的列B的值,并添加THAT作为第二个combobox中的项目。

达到这个目标的最好方法是什么?

听起来像你可能只需要使用Excel中的VLookup或HLookup函数。 他们的工作类似于你想要做的,没有编码,只是公式。