I have a summary worksheet from which I have student names that are hyperlinked to their own worksheet which has student grades on it. My problem is that I would like to change the hyperlink labeled "student 1" on the summary page, which is the default name when opening the workbook from the template, to the actual student name. After doing so it should then take me to that worksheet and place that name in cell A1. It should also change the name of the worksheet to the student name. Here is the code I currently have that does in fact change the worksheet name but then upon coming back to the summary hyperlink won't link back to the same page. It won't recognize the new name and links me to the summary by default. BTW, the student worksheets A1 cell is referenced to the summary worksheet hyperlinked cell.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address = "$A$1" Then Sh.Name = Target
End Sub
What's wrong? I did not develop this code, it was given to me by someone else. I say this only to let you know I'm not a VBA programmer.

Thanks!