Try this

=LEFT(A1, FIND("^", SUBSTITUTE(A1," by ","^",(LEN(A1)-LEN(SUBSTITUTE(A1," by ","")))/4))-1)
note there are spaces to each side of by inside the quotes