7 messages in org.openoffice.fr.progRe: [prog] OOo2 - Copier et Coller un...
FromSent OnAttachments
Ludovic CHEVALIERDec 21, 2005 1:32 am 
Bernard MarcellyDec 21, 2005 2:05 am 
Ludovic CHEVALIERDec 21, 2005 2:17 am 
Laurent GodardDec 21, 2005 2:24 am 
Ludovic CHEVALIERDec 26, 2005 12:50 pm 
brunoDec 27, 2005 2:47 am 
Mathias MichelDec 28, 2005 12:58 pm 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:Re: [prog] OOo2 - Copier et Coller un tableau dans un traitement de texteActions...
From:Ludovic CHEVALIER (tens@no-log.org)
Date:Dec 26, 2005 12:50:44 pm
List:org.openoffice.fr.prog

Bonjour, merci pour votre aide.

Laurent Godard a écrit :

l'enregistreur de macro peut tre utilisé dan scertains cas quand il simplifie une procedure (voir la rend possible) C'est la ca du copier coller Utilise les dispatchers .Uno:Copy et .Uno:Paste

OK, c'est fait et ça fonctionne. Sauf que je ne souhaiterai sélectionner que le tableau, et rien de ce qu'il y'a un peu avant et un peu après.

Voici mon code:

[ Option Explicit

Sub CC_Section_Tests dim oDevis as Object dim oSectionsD as Object dim oSectionD as Object dim oTexteD as Object dim CurseurD as Object dim textSel as string dim oTableD as Object dim curseurVisible as Object, oSelD as Object

'Paramètrages oDevis = ThisComponent oSectionsD = oDevis.TextSections oTexteD = oDevis.Text oSectionD = oSectionsD.getByName("Section5")

'Sélection visible de la section du devis à copier CurseurD = oTexteD.createTextCursorByRange(oSectionD.Anchor) 'ici une erreur apparaît, car, je pense, la section commence par le tableau oDevis.CurrentController.Select(CurseurD) End Sub ]

Je n'ai pas de solutions pour le moment, alors, si quelqu'un est tenté par ce défi,

merci d'avance,

Ciao!

Ludo