find intersection and delimit the values

dear, i have command button delimits the value of cells i choose and put the result in sheet "pure" from column "C3:E" ( see attached file ) .
what i need is edit the code to be , example if i select range of cells as "C4:C5" i want to search to the word "Heading5" in row2 and get the intersections between cells i selected and column of "Heading5" "F4:F5" , then delimit them in sheet "pure" in column "C3" and "D3" and "G3" and in column "B3" paste the cells i select it i.e " B , C ".
note : the word "Heading5" not always exist in same column , so i need to search it in all row2 .

see attache file

Best Regards

sorry for duplication , there was an error to post the thread , how can i close this thread ?

see attached file

great code , thank you very much Mr. mikerickson , the code works well .

Best Regards

dear Mikerickson, the code split the data just from the column "F:F" as fix , but what i want is to search in Row2 for word "heading5" it may be in column "F" and sometime in another column "H" or "L" or any column another and then split the data . so the intersection must be between the selection data and the column that have "headin5" , so if you please can you to edit the code ?, also if you can i need the code to give me a message "there is no data" if the intersection between selection and the column of "heading5" is not numbers to split it .


Best Regards

yessss this is what i want , i'm very thankful Mr. Mikerickson the code works very well .

thank you