搜索表格和复制单元格值

时间:2014-08-18 07:35:55

标签: vba excel-vba excel

我有一张名为姓名的表,其中包含有关多个人的信息。我想浏览整个列,搜索某个人的姓名,该人的姓名是输入textBox1的值。找到名称后,它将遍历存储地址的两列,并将该值放入变量中。完成后,我想转到另一个名为Summary的工作表,并将该值粘贴到单元格L2中。我知道如何循环使用这些值,但我对其余部分感到困惑。下面显示了我到目前为止所拥有的内容:

Set rng = Range("C1:C1000")

For Each cell In rng
   If cell.Value <> textBox1.value Then
End If
Next cell

1 个答案:

答案 0 :(得分:1)

你可以尝试:

If cell.Value = textBox1.value Then
    var = cell.offset(0,2)
    sheets("Summary").range("L2") = var
End If