Bonjour à tous,

Dans un diaporama Powerpoint, j'ai créé un bouton d'action associé à cette procédure :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public Sub Ouvrir()
 
Dim xlApplication As Object
 
Application.WindowState = ppWindowMinimized
 
Set xlApplication = CreateObject("excel.application")
 
xlApplication.workbooks.Open ("monrépertoire\monfichier.xls")
 
xlApplication.Run "active_usf_saisie"
 
xlApplication.Visible = True
 
End Sub
La procédure appelée "active_usf_saisie" dans le classeur Excel est ainsi codée :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Public Sub active_usf_saisie()
Load Msg_Saisie
With Msg_Saisie
        .Lb_version.Caption = [Version]
        .Show
End With
End Sub
Or, la procédure s'exécute mais se positionne aussitôt en mode "Arrêt" avec le débogueur surlignant la méthode
Code : Sélectionner tout - Visualiser dans une fenêtre à part
.Show
Je ne comprends pas.

Dans un deuxième temps, j'ai ôté l'appel de procédure dans Powerpoint pour l'intégrer à l'évènement "Open" de mon classeur Excel. Même résultat.

Quelque collègue aurait-il une explication et/ou une méthode pour la résolution de cet échec?

Par avance, merci.