Bonjour fabien, J 'avais moi aussi passer bcp de temps à essayer d'ouvrir un document en arrière plan mais cela ne fonctionnait jamais, malgré tous les exemples que je voyais sur le web et qui semblaient marcher selon leurs auteurs. Jusqu'au jour ou je me suis rendu compte que je mettais la valeur true entre guillemets : "true" au lieu de true. J'ai enlevé les guillemets et miracle le document n'était plus visible lors de l'éxécution de la macro.
Cela parait un peu bête pour certains pros mais sait-on jamais .... Abi > -----Message d'origine----- > De : Fab [mailto:[EMAIL PROTECTED] > Envoyé : lun. 12 juin 2006 05:22 > À : prog@fr.openoffice.org > Objet : Re: [prog] Fwd: propriete "hidden" > > > Martin Blaizot a écrit : > > Bonjour, > > > > J'utilise la la macro suivante pour créer des documents > "visibles" ou > > non; peut-être cela t'aidera-t-il > > > > Public function create_doc( _visible as boolean ) > > > > Dim propFich(0) as New com.sun.star.beans.PropertyValue > 'l'index (0) > > permet d'indiquer que la variable propFich > > ' à une propriété particulière, qu'on définit ensuite par > son nom (ici" > > Hidden") et par sa valeur (ici, TRUE) > > propFich(0).Name = "Hidden" > > If _visible = true then > > propFich(0).value = FALSE > > Else > > propFich(0).value = TRUE > > End if > > adresseDoc = "private:factory/swriter" 'convention pour indiquer un > > nouveau document writer > > MonDocument = > StarDesktop.LoadComponentFromURL(adresseDoc,"_blank", 0, > > propFich()) > > End function > > > > Bonjour, > > ça fait parti des nombreuses méthodes que j'ai essayées, mais > sans résultat. > Ca marche chez vous? Je veux dire, quand vous ouvrez un > fichier avec la > valeur "true" à propriété "hidden", il n'apparaît pas? > Chez moi, que je mette les valeurs "true" ou "false" à > "hidden", je ne > vois aucune différence. > > Merci pour votre aide, > > Fabien. > > --------------------------------------------------------------------- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > "********************************************************************* Ce message et tout document transmis sont strictement confidentiels et destines uniquement aux personnes auxquelles ils sont adresses. Ce message electronique a ete controle par un antivirus. ********************************************************************** ********************************************************************** This email and any files transmitted with it are confidential and intended solely for whom they are addressed. This email message has been swept for the presence of computer viruses. ********************************************************************** ********************************************************************** Questo messaggio cosi' come ogni documento inviato, e'strettamente confidenziale. Sono destinati solo alle persone indicate nell'indirizzo. Questo messaggio elettronico e'stato controllato da un antivirus. **********************************************************************" --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
