Comment, à la création d'un document depuis un modèle, obtenir une boîte de dialogue me demandant de remplir des informations qui seront insérées automatiquement dans le document lors de la validation de cette boîte de dialogue ? Pour fonctionner, le document : - contiendra des repères de texte ("Bookmarks" en anglais) : "dossier", "version", "date", "etc". - contiendra un module comprenant lui-même 2 macros + 1 boîte de dialogue : o Dialogue1 : la boîte de dialogue. o ShowMe : affiche la boîte de dialogue par l'instruction "Dialogue1.show". o InsereLesChamps : insère les champs lorsque l'on appuie sur "Ok". Cette opération est réalisée avec les instructions du type : -------------------------------- ... # définition du contenu d'un champ (Textbox4.Text) # de la boîte comme variable : dossier = Textbox4.Text # Saut dans le document au repère de texte # (ici "dossier") correspondant : Selection.GotoBookmark("dossier") # Insertion du champ de la boîte défini # comme variable : Selection.Insert(dossier) ... # Ainsi de suite pour chaque élément ... # à la fin, instruction de fermeture # de la bpîte de dialgue. Dialogue1.hide -------------------------------- Comme la boîte de dialogue doit apparaître non pas à l'ouverture du modèle mais à la *création d'un nouveau document à partir de ce modèle*, il faut attacher la macro à l'événement "Créer le document" sous "Outils – Configurer – Événements" et ne pas oublier de cocher la case "Document" (car si on laisse "StarOffice" cochée, *chaque* création de document appellera la macro !). Auteur : Eric Savary Date : 05/11/2000