Bonjour,
A la relecture de ton message (et du mien), je crains d'avoir fait un
léger "hors sujet" ;-)))) Mon code correspond au remplissage d'une
textbox d'un formulaire. Pour une boite de dialogue, c'est quasiment la
même chose (code ci dessous)
Bon courage,
Jean-Claude
Sub Test
Dim oDialog As Variant 'Boite de dialogue de choix du fichier
'Crée la Boite de dialogue
oDialog = createUnoDialog(DialogLibraries.Standard._DlgSelFicXL)
'Modifie le texte du controle nommé "FileCtrl"
oDialog.Model.FileCtrl.Text = "Toto"
'Affiche la Boite de dialogue
oDialog.execute
'Referme la Boite de Dialogue
oDialog.endExecute()
End Sub
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
