Bonjour Michel
Michel Rudelle wrote > Depuis la version 4, la possibilité de copier un style dun document à un > autre a disparu (un retour est prévu ). > ... > Mais pour les styles de page, je nai rien trouvé, la copie dune feuille > de > Calc nemmène pas le style de page avec :-( > ... > Avez-vous une solution sans jongler avec les versions ? Solution provisoire, si cela ne te gêne pas d'utiliser une macro: 1. Coller la macro ci-dessous dans la bibliothèque "Mes macros et boîtes de dialogue > Standard" 2. Ouvrir le classeur "cible" (celui dans lequel on veut récupérer les styles de page). 3. Exécuter la macro ChargerStylePage (elle demande de sélectionner le document contenant les styles de page à récupérer). La fonctionnalité assurée est ici minimum: - on ne traite que les styles de page - on charge les styles de page en remplaçant les styles existants (attention donc...). -on ne choisit pas parmi les styles de page celui ou ceux qu'on veut charger (ils le sont tous). -on ne fait aucun contrôle (le document choisi est-il un classeur par exemple ?). - etc. Nota: je n'ai pas le temps (ni l'envie) de packager plus car cette fonctionnalité est (selon toute vraisemblance) en cours d'analyse et de refonte par les dev. C'est juste une "rustine" vite fait pour dépanner donc :) option explicit sub ChargerStylePage dim oDoc as object, oFp as object dim sChoix as variant dim sUrl as string Dim aArgs(1) As New com.sun.star.beans.PropertyValue aArgs(0).Name = "OverwriteStyles" aArgs(0).Value = True aArgs(1).Name = "LoadPageStyles" aArgs(1).Value = true oDoc = thiscomponent oFp = createUnoService( "com.sun.star.ui.dialogs.FilePicker" ) oFp.initialize( array(com.sun.star.ui.dialogs.TemplateDescription.FILEOPEN_SIMPLE) ) oFp.setMultiSelectionMode(false) if oFp.Execute() = com.sun.star.ui.dialogs.ExecutableDialogResults.OK then sChoix = oFp.GetFiles sUrl= sChoix(0) oDoc.stylefamilies.loadStylesFromURL(sURL, aArgs() ) msgbox "Terminé" End if end sub Cordialement Pierre-Yves -- View this message in context: http://nabble.documentfoundation.org/Copier-un-style-de-page-entre-classeurs-tp4052228p4052297.html Sent from the Users mailing list archive at Nabble.com. -- Envoyez un mail à users+h...@fr.libreoffice.org pour savoir comment vous désinscrire Les archives de la liste sont disponibles à http://listarchives.libreoffice.org/fr/users/ Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être supprimés