Bonjour,
Le 01/12/2017 à 14:56, [email protected] a écrit :
OS:: Windows 7 Version:: 4.x.y
Quel est le code basic pour : - scinder un tableau en 2 (après avoir
sélectionné la dernière ligne du tableau initial avec le curseur
visible par exemple - ou autrement si c'est plus facile) ?
(split sur le tableau ne marche pas pour cela, j'ai vu quelque part
que cela se ferait peut-être par une propriété de ligne mais je n'ai
pas trouvé laquelle)
je viens de tester avec l'enregistreur de macros et j'obtiens ceci :
8< ---------------------------------------------------------------------
sub ScinderTablo
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 ----------------------------------------------------------------------
dim args1(0) as new com.sun.star.beans.PropertyValue
args1(0).Name = "Type"
args1(0).Value = 1
dispatcher.executeDispatch(document, ".uno:SplitTable", "", 0, args1())
end sub
8< ---------------------------------------------------------------------
et chez moi (Debian Linux v.8.qqch, LibO 5.4.3, c-à-d version
"Evolution") ça fonctionne pour d'autres tableaux.
Cas d'utilisation testé :
1. Insérer un tableau (ex : 4 lignes, dont une de titre)
2. Placer le curseur visible dans la cellule la plus à gauche de la
dernière ligne
3. Exécuter la macro
-> j'obtiens 2 tableaux.
Si vous répondez, merci de penser à utiliser la fonction "répondre à
tous" de votre logiciel de courrier électronique de façon que la liste
reçoive une copie de votre réponse.
Bien cordialement,
--
Jean-Francois Nifenecker, Bordeaux
--
Envoyez un mail à [email protected] pour vous désinscrire
Les archives de la liste sont disponibles à
https://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne
pourront pas être supprimés
