searching for a string in excel using VBA

how do i search for a starting of string in VBA in all excel sheets and paste the full string in another sheet

there are 5 sheets i an excel

Example : the string is "ani" result : all the words starting from "ani" should appear in a new excel.