根据选择将数据复制到新添加的工作表

I have the following code that adds new worksheets based on a range of cells in another worksheet. The code adds up to 10 worksheets and it will name them after the data written in cells. For example: I might have the following data in my "VG-Class" worksheet:I have the following code that adds new workshe