Le 12/09/2016 à 10:49, andriant sandy a écrit :
Bonjour,

Je voudrais compléter une macro.

Une première macro me fait un collage d'un tableau format rtf dans une feuille Writer. C'est systématiquement le 1° tableau de la page.

Une seconde macro me fait une mise en page spécifique pour ce tableau.

Je voudrais enchaîner les 2 en indiquant au curseur de se placer en A1 pour pouvoir exécuter la 2° macro.

Lorsque j'utilise l'enregistreur, je n'obtiens rien de probant.

Merci de vos lumières.


Bonjour,

regarde si cet échange peut t'être utile, j'avais trouvé comment aller au début du tableau, puis au début du document –étape que tu peux supprimer dans ton cas.
C_Lucien

-------- Message transféré --------
Sujet :         Re: [fr-users] Retour haut de document
Date :  Sat, 13 Aug 2016 18:09:13 +0200
De :    Conil26 <andriant.sa...@gmail.com>
Répondre à :    andriant.sa...@gmail.com
Pour :  users@fr.libreoffice.org



Et bien

Même si je ne comprends pas non plus pourquoi, ça marche en répétant la
consigne.
J'adopte.
Merci

Cordialement
Sandy-Pascal Andriant

Le 13/08/2016 à 17:59, LC_Libre a écrit :
> Le 13/08/2016 à 17:02, Conil26 a écrit :
>> Bjr,
>>
>> Après avoir inséré un tableau dans un document la macro ci-dessous
>> ramène le curseur en haut du tableau alors que je voudrais qu'elle le
>> ramène au début du document.
>>
>> rem
>> ----------------------------------------------------------------------
>> dispatcher.executeDispatch(document, ".uno:GoToStartOfDoc", "", 0,
>> Array())
>>
>> Que dois-je modifier ?
>>
>> Merci
>>
>
> Bonjour,
>
> Pas à pas, je voyais le curseur se positionner d'abord en début du
> tableau, puis en second au début du document.
>
> Curieusement, au clavier, il fallait effectivement exécuter deux fois
> la commande pour atteindre le début du document.
>
>
> Finalement, j'ai obtenu le résultat attendu en intercalant la commande
> qui positionne le curseur au début du tableau
>> sub Main
>> rem
>> ----------------------------------------------------------------------
>> rem define variables
>> dim document   as object
>> dim dispatcher as object
>> rem
>> ----------------------------------------------------------------------
>> rem get access to the document
>> document   = ThisComponent.CurrentController.Frame
>> dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
>>
>> rem
>> ----------------------------------------------------------------------
>> dispatcher.executeDispatch(document, ".uno:GoToStartOfTable", "", 0,
>> Array())
>>
>> rem
>> ----------------------------------------------------------------------
>> dispatcher.executeDispatch(document, ".uno:GoToStartOfDoc", "", 0,
>> Array())
>>
>> end sub
> Je ne sais pas l'expliquer.
> C_Lucien
>

--
Système technique : Mac OS 10.10.5, RAM 8 Gio, LibreOffice 4.4.7.2 & 5.1.5.2

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

Répondre à