Bonjour à toutes et à tous,

Petite problématique du jour, le tout expliqué en image.

Nom : Untitled.png
Affichages : 1874
Taille : 95,9 Ko

La macro fonctionne presque, mais bug à un moment avec "Erreur d’exécution 438 - Propriété ou méthode non gérée par cet objet".

Voilà le code associé à cette fonction :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Private Sub ADD1_Click()
'ADD1 = Bouton "Ajouter Lien"
Application.Dialogs(xlDialogInsertHyperlink).Show
'Nom_Lien = textbox associée
Nom_Lien.Text = Application.Dialogs(xlDialogInsertHyperlink)
DoEvents
End Sub
J’espère que vous aurez la réponse à mon problème, ou du moins une alternative tout aussi efficace.

Milles merci par avance,

Cordialement.
JFA