找特定字符串返回特定值

找特定字符串返回特定值 比如字符串裏面包含 張三 李四  王五  就返回 「辦公室」  Sub test()         Dim i As Long         Application.ScreenUpdating = False  '關閉屏幕刷新         For i = 3 To Cells(Rows.Count, "G").End(xlUp).Row             I

>>阅读原文<<