Move columns Based in Header and come back to Original format

Hi Guys,

I found a Macro to move columns based in the header I want . But I need your help with some ideas to know how to come back to the original column order after a data update. Attached the macro and a example for the expected result

Example :

Capture3.JPG

Macro
MoveCols1.xlsm