Get Mirrored Column "Structure" in 2 Sheets

So this turned out to be a complete mind-breaker for me.

Thanks to the help I previously received on this forum I can already manage (and enjoy!) quite a lot of basic VBA coding by myself. For which I am more than grateful. However this one still looks one leap too far. It has me completely puzzled.


I have two sheets in one workbook with at about 100 columns.
Most column headers appear in both sheets, but some column headers from sheet 1 do not appear in sheet 2 and vice versa.

What I want is to get both sheets exactly equal in their "column structure"
In short the missing columns should become present in both sheets, so that both contain exactly the same number of columns and each column is in exactly the same spot as in the other sheet.

Simplified in an example:

Original sheet 1:
(misses columns with heading C and E)

Original sheet 2:
(misses column with heading A)


Desired result sheet 1:
(added the missing column headings C and A)




Desired result sheet 2:
(added the missing column heading A)




Please note that no values from inside the columns need to be transferred, except for the heading and that the order needs to be exactly identical in both sheets.


Until now I only managed to get the columns sorted ascending based on their heading name in both sheets. I have not managed to identify the missing columns and add them to the sheet in which they are missing.


So I really, really hope one of you can help me out with this.
Thanks already very much in advance!