Re: [fr-users] Macro : collage spécial

Bonsoir,

Le 28 juin 2012 16:29, claude <pref-open-office@haute-garonne.gouv.fr> a
écrit :

> Bonjour,
>
> Dans une macro, je voudrais remplacer le copyrange par un collage spécial.
> malheureusement, je n'arrive pas à trouver la syntaxe adéquate.


Si tu utilises l'enregistreur de macro, il faut viseblement passer par une
fonction "insertContents" :

rem ----------------------------------------------------------------------
dim args3(5) as new com.sun.star.beans.PropertyValue
args3(0).Name = "Flags"
args3(0).Value = "SVDNT"
args3(1).Name = "FormulaCommand"
args3(1).Value = 1
args3(2).Name = "SkipEmptyCells"
args3(2).Value = false
args3(3).Name = "Transpose"
args3(3).Value = false
args3(4).Name = "AsLink"
args3(4).Value = false
args3(5).Name = "MoveMode"
args3(5).Value = 4

dispatcher.executeDispatch(document, ".uno:InsertContents", "", 0, args3())

sais pas si ça peut t'aider :-/

Yves

> Quelqu'un pourrait-il m'aider?
>
> Merci
>
> Claude
>
>
> --
> Envoyez un mail à users+help@fr.libreoffice.org pour savoir comment vous
> désinscrire
> Les archives de la liste sont disponibles à http://listarchives.**
> libreoffice.org/fr/users/ <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


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

-- 
Envoyez un mail à users+help@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