Bonjour à tous

Je souhaite pouvoir ouvrir PowerPoint et lancer un slide lorsque je clique sur un bouton de mon userform dans Excel

Je suis novice en VBA et je galère depuis plusieurs heures.
Voici mon code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
sub PPTClick() 
 
Dim FichierPpt, pwpt, presppt 
FichierPpt = "F:\Utilisation du compresseur.ppt" 
Set pwpt = CreateObject("PowerPoint.Application") 
pwpt.Visible = True 
 
Set presppt = pwpt.presentations.Open(Filename:=FichierPpt) 
presppt.SlideShowSettings.Run 
 
end sub
Lorsque je lance clique sur le bouton, il ouvre powerpoint et me sort le message suivant :
Erreur d'exécution '-2147467259 (80004005)
PowerPoint could not open the file.

lorsque je clique sur déboguage, il me surligne la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Set presppt = pwpt.presentations.Open(Filename:=FichierPpt)
Qq'un pourrait il m'aider ?