Re: [prog] Problème d'assignation

Mon, 02 Oct 2006 20:55:06 -0700 

Sub Message
   Dim oDlgMessage As Object
   DialogLibraries.LoadLibrary("Standard")   ' charger la bibliothèque
contenant le Dialog
   oDlgMessage = CreateUnoDialog(DialogLibraries.Standard.DLG_Message )
    oDlgMessage.execute()
   oDlgMessage.dispose()
End Sub


Christine



Le 02/10/06, Jean-Claude N'DOUNGA <[EMAIL PROTECTED]> a écrit :



Bonjour,

Voici une macro qui sert à afficher une boite de dialogue contenant un
message.

Sub Message
     Dim oDlgMessage As Object
     oDlgMessage = CreateUnoDialog(DialogLibraries.Standard.DLG_Message )
     oDlgMessage.execute()
     oDlgMessage.dispose()
End Sub

Exécutée seule, cette macro fonctionne.
Mais assignée à l'ouverture d'un document, elle génère l'erreur suivante :

"Action non supportée. Appel de procédure incorrect. "
Que faire pour obtenir l'effet recherché à l'ouverture du document ?

Merci par avance. Cordialement.

Jean-Claude N'DOUNGA

Répondre à