VBA to match and sort data in two columns, then copy to another two colums

Hi All, looking for some direction on this one, thanks in advance.

I have copied data from an external website and cleaned it up. I need to sort the data in a couple of columns (H and J) and copy it to columns A and B maintaining the integrity of the row so I can use VLOOKUP from another sheet.

The data in columns (H and J) is mixed but I want to sort it so if the content partially matches a specific text it gets copied to Colum A but if it doesn’t match then it is to be copied into column B. Sometimes columns H and J will both contain a partial match to the specific text, in those instances I want to copy the data in column H to column A and from column J to column B. This is the result I'm trying to achieve

Text to partially match within a cell = “Ro Roc”

EG.PNG