import specific columns from one workbook to another from matching header with vba

[rkb1510]

How can I import/copy columns based on their header name from one excel workbook to another excel workbook using macro/VBA code.
EX: Source WB

[TR]
[th width="var(--_ta-th-w)"]Column A[/th][th width="var(--_ta-th-w)"]Column B[/th][th width="var(--_ta-th-w)"]Column C[/th][th width="var(--_ta-th-w)"]Column D[/th]
[/TR]
[TR]
[td width="var(--_ta-td-w)"]Cell 1[/td][td width="var(--_ta-td-w)"]Cell 2[/td][td width="var(--_ta-td-w)"]Cell 3[/td][td width="var(--_ta-td-w)"]Cell 4[/td]
[/TR]
[TR]
[td width="var(--_ta-td-w)"]Cell 5[/td][td width="var(--_ta-td-w)"]Cell 6[/td][td width="var(--_ta-td-w)"]Cell 7[/td][td width="var(--_ta-td-w)"]Cell 8[/td]
[/TR]

Target WB

[TR]
[th width="var(--_ta-th-w)"]Column B[/th][th width="var(--_ta-th-w)"]Column D[/th]
[/TR]
[TR]
[td width="var(--_ta-td-w)"]Cell x[/td][td width="var(--_ta-td-w)"]Cell y[/td]
[/TR]
[TR]
[td width="var(--_ta-td-w)"]Cell x[/td][td width="var(--_ta-td-w)"]Cell y[/td]
[/TR]

Output should be updating Target WB with data of columns from source WB as below

[TR]
[th width="var(--_ta-th-w)"]Column B[/th][th width="var(--_ta-th-w)"]Column D[/th]
[/TR]
[TR]
[td width="var(--_ta-td-w)"]Cell 2[/td][td width="var(--_ta-td-w)"]Cell 4[/td]
[/TR]
[TR]
[td width="var(--_ta-td-w)"]Cell 6[/td][td width="var(--_ta-td-w)"]Cell 8[/td]
[/TR]

 

[Peter_SSs]

Welcome to the MrExcel board!

I suggest that you investigate XL2BB for providing sample data
(If you have trouble with XL2BB, review the "XL2BB Icons greyed out" link in the 'Known XL2BB issues' section near the top of the XL2BB Instructions page linked above.)