Sub AASearchForPartialText()
Dim SearchValue As String
SearchValue = Range("d2").Value
Columns("D:D").Select
Selection.Find(What:=SearchValue, After:=ActiveCell, LookIn:=xlValues, LookAt _
:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
End Sub
我试图通过输入他们想要查找的部分字符串并点击搜索按钮来允许用户搜索一长串名称(有时是 2000 年),从而简化/加快 excel 搜索功能。期望的结果是它将循环遍历名称列表,突出显示下一个匹配的连续单元格
我正在做的最好的事情是突出范围 d:d。谁能帮帮我?
我已经为任何足够友善的人提供了示例工作簿
谢谢你们
https://www.dropbox.com/s/uahuzsu3a8qfv6z/searchpartial.xlsm