Использование функции InStr в Select Case

Это не похоже на работу. Есть ли способ сделать то, что я пытаюсь сделать здесь? Я не могу выбрать случай, если значение находится в данном укусе:

Select Case gTTD.Cells(r, 4)

     Case InStr(gTTD.Cells(r, 4), "MASTER LOG")
         resp = "MM LOG"
      Case InStr(gTTD.Cells(r, 4), "MASTER MET")
         resp = "MM MET"
     Case "PIR"
         gTTD.Cells(r, 7) = "Martin Trépanier"
         resp = "Martin Trépanier"

 End Select

Я понимаю, почему это не может работать, но есть ли способ заставить его работать? благодарю вас

Спасибо

Ответы на вопрос(2)

Ваш ответ на вопрос