VBA excel Lien hypertexte => dernière feuille

Je souhaite écrire une macro VBA pour Excel qui crée un lien hypertexte de la cellule active vers la dernière feuille du classeur.
Le programme ci-dessous ne fonctionne pas, vraisemblablement à cause de "Sheets(Sheets.Count).Range("A1")" - comment faut-il que je désigne la dernière feuille ?
Merci d'avance !

Sub Macro3()

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _

Sheets(Sheets.Count).Range("A1"), TextToDisplay:= _

Sheets(Sheets.Count).Name

End Sub