If Sheets("temp").Range("B" & x).Value Like "*" & Sheets("base").Range("B" & y).Value & "*" Then нужно подсчитать количество символов в этом слове(Length)
а также с которого места начинается (Start).
К примеру слово "КАБЕЛЬ" имеет 6 символов и начинается с 8 места с начала текста(пробелы тоже учитываютя): ENERJİ КАБЕЛЬ H05VV-F 2x0,75 ГИБКИЙ(ЭЛАС.) 500V
Else GoTo EndLine
а также с которого места начинается (Start).
К примеру слово "КАБЕЛЬ" имеет 6 символов и начинается с 8 места с начала текста(пробелы тоже учитываютя): ENERJİ КАБЕЛЬ H05VV-F 2x0,75 ГИБКИЙ(ЭЛАС.) 500V
Else GoTo EndLine