Lien hypertexte dans Macro

Bonjour à tous,

Je suis nouveau sur ce forum et je suis intéressé par la macro de cette discussion permettant de créer une nouvelle feuille avec un lien hypertexte.

J'ai copié le code et je l'ai adapté à mon cas. Quand je créer une 1ère feuille la macro marche nikel mais à partir de la 2ème j'ai un message d'erreur 404.

Pourriez vous m'aider SVP?

Merci d'avance,

Arrno

bonjour Arrno,

pour créer un lien qui créer une nouvelle feuille
insere un lien en Feuil1 cellule A1 pointant sur lui meme "Feuil1!A1",
et un texte à afficher "Créer une nouvelle feuille"
et sur la page code de cette feuille, mets la macro suivante,

Code:

---

1 2 3

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) If Target.SubAddress = "Feuil1!A1" Then Sheets.Add End Sub

---