Re: [fr-users] Macro ... et couleurs de lettre

Ooopps

cliqué trop vite :o)
la première manière de changer la couleur est via la fonction RGB mais ici
elle est écrasée par la ligne suivante qui fait un aléatoire sur toutes les
couleurs possibles.
A toi de choisir ce qui te convient comme ligne ;)

Yves

Le 5 juin 2018 à 21:42, yves dutrieux <ydutrieux@gmail.com> a écrit :

> sub DiffCouleur1
> rem ----------------------------------------------------------------------
> rem define variables
> dim document   as object
> dim dispatcher as object
> rem ----------------------------------------------------------------------
> rem get access to the document
> document   = ThisComponent
> curseur=ThisComponent.currentcontroller.ViewCursor
> ' change les 10 caractères qui suivent le curseur courant par une couleur
> aléatoire
>   for i = 1 to 10
>       curseur.goright(1,true)
>       curseur.CharColor=rgb(i*24,0,0)
>       curseur.CharColor=rnd()*16581375
>       curseur.goleft(1,false)
>       curseur.goright(1,false)
>   next
> end sub
>
>
>
> Le 5 juin 2018 à 14:47, isaric <isaric.co@free.fr> a écrit :
>
> > Merci Jean-Francois Nifenecker  pour ta réponse à la question n°1 qu'il
> > l'a
> > résolu
> >
> > pour la 2e je n'ai pas encore trouvé de solution
> >
> > *Question 2)*
> > Faire une macro avec des couleurs des caractères différents --> le fichier
> > joint :
> > Couleur de lettre.odt <http:// https://www.cjoint.com/c/HFedoTRr5kn>
> > Problème les couleurs changent ?
> >
> >
> >
> >
> >
> >
> >
> > -----
> > Utilise Libreoffice avec Ubuntu
> > --
> > Sent from: http://document-foundation-mail-archive.969070.n3.nabble.com
> > /Users-f1744091.html
> >
> > --
> > Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour vous
> > désinscrire
> > Les archives de la liste sont disponibles à
> > https://listarchives.libreoffice.org/fr/users/
> > Privacy Policy: https://www.documentfoundation.org/privacy
>
>
>
> --
> web site : http://www.molenbaix.com



-- 
web site : http://www.molenbaix.com

-- 
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour vous désinscrire
Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy