Macro to copy a sheet and rename it based on a list

I’m trying to make sheets that will copy a template and then rename it based on the names on the summary sheet.