VBA excel Lien hypertexte => dernière feuille

Résolu
ghilleret -  
 ghilleret -
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


A voir également:

1 réponse

lermite222 Messages postés 8724 Date d'inscription   Statut Contributeur Dernière intervention   1 191
 
Bonjour,
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="", SubAddress:= _
 Sheets(Sheets.Count).Name & "!A1", TextToDisplay:=Sheets(Sheets.Count).Name

A+
3
ghilleret
 
Merci beaucoup !
0