vba find text , move entire cell to the same row column C

Hello Skywriter,
Your code is to complicate for me, so I can not check why it is not working. It runs without errors, but nothing happens.