[fr-users] macro : bordure de tableau dans Writer

Bonjour,

Je cherche à rajouter des bordures doubles dans un tableau sous writer 
par macro.

En cherchant sur le Net, j'ai trouvé borderline2 qui comprend un élément 
style permettant à priori de définir le style d'encadrement.

Par contre dans l'objet "TextTables" l'élément style n'existe pas et 
donc le type de bordure ne se met pas à jour.

Quelqu'un connaît-il un moyen d'y parvenir ?

Voici un extrait de ma macro

option explicit

sub FormatTableau

dim UnTableau as object, BordureTableau as object
dim Bordure as new com.sun.star.table.BorderLine2


with Bordure
   .Color = 26316
   .InnerLineWidth = 1
   .LineDistance = 0
   .OuterLineWidth = 10
   .linestyle = 5
end with

UnTableau = thiscomponent.TextTables(0)
BordureTableau = UnTableau.TableBorder
BordureTableau.LeftLine = Bordure
UnTableau.TableBorder = BordureTableau

end sub

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/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être 
supprimés