Classe Hyperlink (PowerPoint VBA)

La classe Hyperlink représente un lien hypertexte associé à une forme ou du texte d’espace non réservé.

La procédure principale de la classe Hyperlink est Delete

Set

Pour utiliser une variable de classe Hyperlink, elle doit d'abord être instanciée, par exemple

Dim hyp as Hyperlink
Set hyp = Application.Selection.Hyperlinks(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe Hyperlink : ActionSetting.Hyperlink, Hyperlinks.Item, CustomLayout.Hyperlinks, Master.Hyperlinks, Slide.Hyperlinks et SlideRange.Hyperlinks

Thèmes

Les procédures suivantes de cette classe ont été regroupées et sont décrites sur une page thématique séparée

Display/Show with its procedures ShowAndReturn et TextToDisplay

Méthodes

C'est la méthode principale de la classe Hyperlink

Delete - Supprime l’objet Hyperlink spécifié.

ActivePresentation.SlideMaster.Hyperlinks(1).Delete

Autre Méthodes

CreateNewDocument - Crée une présentation Web associée au lien hypertexte fourni.

Dim strFileName As String: strFileName = 
ActiveWindow.Selection.SlideRange(1).Hyperlinks(1).CreateNewDocument FileName:=strFileName, EditNow:=msoTrue, Overwrite:=msoTrue

Propriétés

Address Renvoie ou définit l’adresse Internet (URL) vers le document cible. Lecture-écriture.

ActivePresentation.Slides(1).Hyperlinks(1).Address = "https://www.codevba.com/"

EmailSubject Renvoie ou définit la chaîne de texte de la ligne de sujet du lien hypertexte. La ligne de sujet est ajoutée à l’adresse Internet (URL) du lien hypertexte. Lecture-écriture.

ActivePresentation.Slides(1).Hyperlinks(1).EmailSubject =

Parent Renvoie l’objet parent de l’objet spécifié.

Dim objParent As Object
Set objParent = ActiveWindow.Selection.SlideRange(1).Hyperlinks(1).Parent

ScreenTip Renvoie ou définit le texte d’info-bulle d’un lien hypertexte. Lecture-écriture.

ActivePresentation.Slides(1).Hyperlinks(1).ScreenTip = "Go to the Code VBA home page"

SubAddress Renvoie ou définit l’emplacement d’un document, tel qu’un signet dans un document Word, un intervalle dans une feuille de calcul Microsoft Office Excel, ou une diapositive dans une présentation Microsoft PowerPoint, associé au lien hypertexte spécifié. Lecture-écriture.

ActivePresentation.Slides(1).Hyperlinks(1).SubAddress =  "last quarter"

Type Représente le type de lien hypertexte. En lecture seule.

Dim mhtType As Office.MsoHyperlinkType
mhtType = ActivePresentation.SlideMaster.Hyperlinks(1).Type

Hyperlinks.Count Renvoie le nombre d'objets de la collection spécifiée. En lecture seule.

Dim lngCount As Long
lngCount = ActiveWindow.Selection.SlideRange(1).Hyperlinks.Count

Hyperlinks.Parent Renvoie l’objet parent de l’objet spécifié.

Dim objParent As Object
Set objParent = ActiveWindow.Selection.SlideRange(1).Hyperlinks.Parent