List Form that populates with column headers

Hello

I have a spreadsheet (that is attached) that has baseball statistics. I want to write a macro that has a list form generate when opened that asks the user which columns they would like to delete. After the user selects the columns they wish to delete, I would like to have that column be deleted in the worksheet.

Is there anyway to do this?

Thank you in advance.

JB