A Saturday, August 27, 2005 11:34 PM [GMT+1=CET],
Philippe <[EMAIL PROTECTED]> a écrit :
chris draux a écrit :
Bonjour,
J'essaie de mettre en pratique le code de la page 459 du livre avec la
2.0 m125.
Dans un document calc vierge appelé classeur.ods.
1. Outils/Macros/gérer les macros
2. Dans classeur.ods gérer Bibliothèques Nouveau PremierDialogue Editer
3. Clic-droit sur Module1 Insérer Boîte de dialogue Basic
4. Dans Dialog1 je crée un bouton. Nom : Oui, Titre : Oui, Type : OK
5. Dans Bibliothèques / PremierDialogue, je crée le code suivant :
Sub Main
Dim Dlg As Object, bibli As Object
Dim monDialogue As Object, exitOK As String
exitOK = com.sun.star.ui.dialogs.ExecutableDialogResults.OK
essayez d'ajouter ici :
DialogLibraries.LoadLibrary("Standard") rem vous remplacer standard par
le nom de votre bibliothèque
Bonjour Philippe,
J'ai ajouter DialogLibraries.LoadLibrary("PremierDialogue")
Résultat : la boîte de dialogue se referme mais aucun message n'apparaît.
Merci pour votre aide.
@+
Christian
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
