[prog] Insertion date dans dialogue

[Arnaud POUSSIER]

Bonjour à tous,   J'ai un petit problème, j'essaie de faire apparaître la date du jour une boite de dialogue mais jusqu'à maintenant rien ne marche, si quelqu'un à une idée   Merci d'avance   Voilà le code sur lequel je travail Sub Main1 Dim Dlg As Object, bibli As Object Dim monDialogue As Object, exitOK As Integer Dim champdate As object exitOK = com.sun.star.ui.dialogs.ExecutableDialogResults.OK bibli = DialogLibraries.GetByName("Standard") monDialogue = bibli.GetByName("Dialog1") Dlg = CreateUnoDialog(monDialogue)   Dlg.Execute = exitOK champdate = Dlg.GetControl("Datefield1")   End Sub