VBA Excel/搜索和替换下一列中的值双变量
VBA Excel/搜索和替换下一列中的值双变量
提问于 2020-09-14 03:37:45
我感觉我已经很近了，但我感觉真的很远。
我有一个名为temp的工作表。
在M2中，有一个惟一的标识符，所以我知道需要在另一个名为specs的表中查找哪一行。
需要将工作表temp的G2的值粘贴到搜索值(在工作表specs中)的右侧3列。
我走了这么远，但现在我被卡住了:/
Sub search()
Dim indexnr As String
Dim rngFind As Range, rngLookUp As Range
indexnr = Sheets("temp").Range("m2")
Data = Sheets("temp").Range("g2")
Set rngLookUp = Range("D1:D1000")
Set rngFind = rngLookUp.Find(indexnr, LookIn:=xlValues).Offset(0, 1)
End Sub 回答 1
Stack Overflow用户
发布于 2020-09-14 05:59:17
For Each Next语句应该执行所需的操作，而不是使用range.find方法。
range.find方法返回另一个range对象，该对象不会将值粘贴到单元格中。
尝试如下所示：
For Each i in [D1:D1000]
tempString = i.value2
if Instr(1,tempString,indexr,0) <> 0 then
i.offset(0,3).value2 = tempString
end if
next i页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/63874837
复制相关文章
相似问题
腾讯云开发者
