使用文本格式的用户定义输入从Excel中检索数据

Question

问题是我可以通过提供单元格引用来提取数据，如：

TextBox1.Text = objWorksheet.Cells(5, 2).value

但我想根据用户提供的输入选择一行，并希望从该行中提取数据。

用户提供的输入是文本格式，在我的情况下是员工的名称。我必须提取该名称的地址。

请帮助我，我在过去两天工作但没有得到任何东西......

代码：

Dim objExcel As New Excel.Application     ' Represents an instance of Excel
Dim objWorkbook As Excel.Workbook     'Represents a workbook object
Dim objWorksheet As Excel.Worksheet     'Represents a worksheet object

objWorkbook = objExcel.Workbooks.Open("C:\record.xls")
objWorksheet = CType(objWorkbook.Worksheets.Item("CC1"), Excel.Worksheet)

TextBox1.Text = objWorksheet.Cells(5, 2).value

Answer 1

您必须使用员工姓名循环列，当您找到要查找的内容时，请移至您对同一行感兴趣的列。