Delete all columns expect specific ones

[Bpd]

Is there a macro to delete all columns expect for specific ones. The macro would search row 6 and delete all columns expect for the specified ones based on their text names in row 6. For example it would not delete the columns named pay, date, gross, in row 6 and delete all other columns

[rcm]

Please Login or Register  to view this content.

[fredlo2010]

Hi try this code in a sample workbook

Please Login or Register  to view this content.

Thanks