VBA Excel: оператор Like не работает правильно

Question

Почему функция Like не работает?В этом случае возвращается:

«Нет, это не так»

Sub test()
    If "*ыписка по договору ук-004#1500333*" Like "выписка по договору ук-004#1500333 стд.xlsx" Then
        MsgBox "Yes, it is!"
    Else
        MsgBox "No, it's not"
    End If    
End Sub

Answer 1

Вместо этого вы также можете использовать InStr, если ваша цель - проверить наличие строки в другой:

Sub test()   
    If  InStr("выписка по договору ук-004#1500333 стд.xlsx", _
        "ыписка по договору ук-004#1500333") > 0 Then
        MsgBox "Yes, it is!"
    Else
        MsgBox "No, it's not"
    End If    
End Sub

Answer 2

У вас есть струны в обратном направлении.

If {string} Like {substring w/wildcards} Then

---

Sub test()
    If "выписка по договору ук-004#1500333 стд.xlsx" Like "*ыписка по договору ук-004#1500333*" Then
        MsgBox "Yes, it is!"
    Else
        MsgBox "No, it's not"
    End If
End Sub