Bonjour,
Je tourne en rond depuis quelques semaines pour trouver la raison pour laquelle le contexte d'aide de la fonction Msgbox ne veut pas s'ouvrir
Reponse_MsgBox = MsgBox("bla bla", vbOKCancel + vbInformation + vbMsgBoxHelpButton, "bla bla", Help_Path_id & "\" & Fichier_Aide, 81)
si je vérifie la variable Help_Path_id & "\" & Fichier_Aide avec debug.print c'est bien le chemin complet du fichier d'aide qui s'affiche.
Le context d'aide 81 est bon : Preuve en est que si je l'ouvre directement avec :
Call Show(Help_Path_id & "\" & Fichier_Aide, , 81)
Qui utilise :
1 2 3 4 5 6 7 8 9 10 11 12 13 14
| Public Sub Show(NewFile As String, Optional WindowPane As String, Optional ContextID)
Dim Fichier As String
Fichier = NewFile
If Len(WindowPane) Then
Fichier = Trim(Fichier) & ">" & Trim(WindowPane)
End If
If IsMissing(ContextID) Then
Call HtmlHelp(0, Fichier, HH_DISPLAY_TOPIC, ByVal 0&)
Else
Call HtmlHelp(0, Fichier, HH_HELP_CONTEXT, ContextID)
End If
End Sub |
La bonne fenêtre d'aide s'ouvre !
Il doit y avoir quelque chose qui me crève les yeux mais je ne vois pas.
Merci pour votre aide
Partager