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
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
