返回列表 上一主題 發帖

[發問] 從儲存格左邊開始搜尋字串

同一格〔同時〕含有〔多個〕關鍵字, 如何取? 以何為優先? 或全取出?

TOP

補圖
test.gif

TOP

試試看:
  1. Sub test()
  2.     [B:B] = ""
  3.     For i = 1 To [A65536].End(xlUp).Row
  4.         For j = 1 To [C1].End(xlDown).Row
  5.             c = InStr(Cells(i, 1), Cells(j, 3))
  6.             If c > 0 Then
  7.                  Cells(i, 2) = Cells(j, 3)
  8.             End If
  9.         Next
  10.     Next
  11. End Sub
複製代碼

TOP

http://blog.xuite.net/hcm19522/twblog/359554303

TOP

        靜思自在 : 要用心,不要操心、煩心。
返回列表 上一主題