aşağıdaki gibi bir düzenleme yapılabilir bu durumda sorun çıkmayabilir
ek_islemler = " " & Replace(ek_islemler, "-", " - ") & " "'<-- burada kelimelerin başına ve sonuna boşluk eklenmiş
    .Pattern = "( " & Replace(istenmeyen, "-", "|") & " )"'<-- burada da kelimelerin başına ve sonuna boşluk eklenmiş

ek_islemler = "ENZİM-HİDROFİL-TURBANG-AİRCO"

istenmeyen = "TURBANG-ENZİM"

ek_islemler = " " & Replace(ek_islemler, "-", " - ") & " "



Dim RegEx As Object

Set RegEx = CreateObject("VBScript.RegExp")

With RegEx

    .IgnoreCase = True

    .Global = True

    .Multiline = True

    .Pattern = "( " & Replace(istenmeyen, "-", "|") & " )"

If .Test(ek_islemler) = True Then MsgBox "veri var"

End With