Separate list into columns

I have list of disciplines that when exported from another system are grouped together in a single cell separated with ||. However, they are not sorted in the same/alphabetical order so I can't split into separate columns, or Sort or Filter.

E.g. Agricultural Engineering||Civil Engineering||Food Technology||Mechanical Engineering||Chemical Engineering||Environmental Engineering||Marine Engineering||Public Health Engineering
are all in one cell

If I use Text to Columns they can be split into individual cells; but another record with the same selections can be displayed in a different order. Which means I end up with random disciplines in cells in a row.

What I need is a column for each discipline and a mark (TRUE, YES, 1, "Agricultural Engineering' or whatever) in that column for each qualifying record that matches the criteria. I.e. if the cell contains 'Public', mark the Public column.

E.g. see attached screenshot of what I'm aiming for

I assume I need an IF or LOOKUP function but I can't seem to get it right. Any help gratefully received!

Try B2
=isnumber(find(b$1,$a2))

hth