Question

我当前正在尝试构建一个工具，该工具将允许我在第二张纸中搜索“ B3”中保存的值。在通过循环在sheet2中找到该值之后，它将随后将其旁边的单元格复制并粘贴到指定目标的sheet1中。我的问题是尝试使用instr函数将其拉入后，我一直收到错误。字符串中是否缺少我想要的东西？还是应该添加其他内容？

这是我到目前为止使用的代码：

 Dim InterfaceNumber As Integer

 Dim finalrow As Integer

 Dim i As Integer 'counter

 Dim InterfaceInformation As Variant

 InterfaceNumber = Sheets("Trackers Search").Range("B3").Value

  finalrow = Sheets("Trackers").Cells(Rows.Count, "C").End(xlUp).Row

   For i = 4 To finalrow

   If instr("C3:D50"),InterfaceNumber) Then

 Sheets("trackers").Range("B" & i & ":E" & i).Copy

   InterfaceInformation = Sheets("trackers").Range("B" & i & ":E" & i).Copy

   Sheets("Trackers Search").Range("B1000").End(xlUp).Offset(1, 
    0).PasteSpecial

Else


 End If

我希望能够在“跟踪器”工作表中循环查找并找到与单元格“ B3”中的值匹配的所有单元格，并将其粘贴到B8：E8范围的第一张工作表中

有没有一种方法可以搜索单元格以找到部分匹配项

0 个答案: