Microsoft 365 Lien hypertexte dans même classeur via VBA

Bonjour à tous,
Je suis une extrême débutante en VBA. J'en appelle à votre indulgence.

Ce que j'ai crée pour le moment
J'ai crée un formulaire de suivi administratif de formation (S'ouvre via le bouton "créer un nouveau suivi de formation" de la page "Données FC!") . A chaque suivi de formation créé via le formulaire,
- Une nouvelle ligne dans la feuille "Données FC" se crée
- En colonne C : un numéro de suivi est créé automatiquement type (FC-2021-001)
- Une nouvelle feuille est crée portant la référence de formation (FC-2021-001)

Ce que je souhaite faire en plus
Pour chaque nouveau suivi de formation crée, je souhaite :
- Créer de façon automatique un lien hypertexte entre la case C (dernière ligne) dans la feuille ("Données FC !") et la feuille portant le même nom.

Je vous joins mon fichier excel, si l'un d'entre vous dispose de quelques minutes pour m'expliquer le pourquoi du comment, je n'arrive pas à comprendre ce qui bloque.

Milles mercis par avance de vos retour,

Bien cordialement

Hélène
 

Pièces jointes

  • Suivi admin pour Forum.xlsm
    384.9 KB · Affichages: 13

youky(BJ)

XLDnaute Barbatruc
Bonjour Miss,
Voici pour le lien.
J'ai ajouté 2 lignes en début de code de l'userform

ActiveSheet.Hyperlinks.Add Anchor:=Range("C" & derligne), Address:="", SubAddress:= _
"'" & Range("C" & derligne).Value & "'!A1"

Voici le code ou le placer
VB:
Private Sub CommandButton1_click()

'crée une nouvelle ligne au tableau en cliquant sur commandbutton1
Sheets("données FC").ListObjects("Tableau10").ListRows.Add
Dim derligne As Long
derligne = Range("c1048576").End(xlUp).Row
   ActiveSheet.Hyperlinks.Add Anchor:=Range("C" & derligne), Address:="", SubAddress:= _
     "'" & Range("C" & derligne).Value & "'!A1"
'creation de la feuille de suivi

Bruno
PS: petit plus
Saisiformation.Hide masque l'userform
tandis que
Unload Saisiformation décharge et libère la mémoire
 
Dernière édition:

Discussions similaires

Réponses
5
Affichages
467

Statistiques des forums

Discussions
314 630
Messages
2 111 386
Membres
111 119
dernier inscrit
cooc