Code to reference sheet names based on index

Hey guys, I need some help on making a code that will allow me to store a worksheets name in a cell. However, the worksheets will continually be added so I need to generally reference them by their index. I was thinking something like this:

Function SheetName(#)
Sheet(#).Name = SheetName
End Function

This way I could put the function into a cell (put =SheetName(2) into a cell to have that cell be filled with the name of the second indexed sheet). However, I do not know the correct syntax as I am just beginning. Any help is greatly appreciated! Thanks!