Comment créer des liens hypertexte avec une macro powerpoint

Bonjour,

Je travaille sur une macro PowerPoint qui crée un tableau dans une diapo et le rempli par des images à partir du code trouvé à l'adresse suivante : https://powerpoint.developpez.com/fa...utimagetableau

Cela marche très bien, mais je voudrais que la macro rajoute aussi un lien hypertexte sur chaque image, vers une autre page de la présentation.
J'ai essayé le code suivant mais cela ne marche pas. Auriez vous une solution ?

Merci d'avance.

Code:

---

1 2 3 4 5 6 7 8

' shp est le tableau défini plus tôt dans le code => shp = sld.Shapes.AddTable(Nb_Diapo - 2, 4, 10, 10, 250, 250) ' et sld est la slide ou se trouve le tableau => sld = ActivePresentation.Slides(Nb_Diapo)   With shp.Table.Cell(2, 1).Shape.ActionSettings(ppMouseClick) .Action = ppActionHyperlink .Hyperlink.SubAddress = 2 'lien vers slide 2 End With

---