Discussion :

[Trarc]

Bonjour,
Je rencontre un problème avec une macro réalisée dans un fichier PowerPoint. Je recherche tous les fichiers PPT contenant les caractères saisis. En suite au sein d'une liste, l'utilisateur sélectionne le fichier qu'il souhaite ouvrir en mode diaporama.
Cela fonctionne bien lorsque je lance la macro en mode diaporama depuis le fichier PPT. Lorsque je le convertis en PPS, la macro génére une erreur (voir PJ) au niveau de la ligne suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Presentations.Open FileName:=Fich, ReadOnly:=True

Comment faut il aborder le problème ?
Par avance merci.

[Invité]

Bonjour

Je n'ai pas réussi à trouver une solution pour cela.

Cependant, ne connaissant pas tous les détails pourquoi tu veux faire cela, je te propose une autre solution en utilisant l'API ShellExecute.

Dans un module tu déclares ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Ensuite, voici un exemple d'utilisation :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

  ShellExecute 0, "open", "C:\Users\Philippe\Documents\Office\PowerPoint\Shady Scene.ppt", "", Application.Path, 1

Tu trouveras plus d'infos ici : http://access.developpez.com/faq/?pa...n#shellexecute

Philippe