Delete column range based on header text

I'm attempting to build a summary sheet for some data I can extract, however the extracted data has extra information I don't need which is making the summary page a real task to build.

What I'd like to do is look across Row 7 in my data and delete cells in rows 7 through 2150 in the column that matches 'Number Logins' in Row 7. Then move remaining cells left.

I've recorded a macro and see how it works deleting and moving the remaining cells, but having no exposure to VBA I don't know how I can make it look for the heading and delete on that basis?

Example sheet attached.

Thanks in advance!