Looping through cells to give the same name

I want to loop through cells and give them the same name to later retrieve the name and call a specific subroutine for the Named cells. The "RefersTo" part of the macro statement for Named Cells doesn't allow for variables when referencing the cells in a loop.

Danny