Voilà,

Avec Loo 3.3.4 et Win 7, ta macro fonctionne correctement mais elle traite
tous les tableaux présents sur la page au lieu de ne traiter que celui dans
lequel on place le curseur.

Reste un réglage :

comment effacer le quadrillage interne pour ne conserver que l'encadré.

Lorsque j'utilise l'enregistreur automatique, il répond :

rem ----------------------------------------------------------------------
dim args4(12) as new com.sun.star.beans.PropertyValue
args4(0).Name = "OuterBorder.LeftBorder"
args4(0).Value = Array(0,0,2,0,0,2)
args4(1).Name = "OuterBorder.LeftDistance"
args4(1).Value = 97
args4(2).Name = "OuterBorder.RightBorder"
args4(2).Value = Array(0,0,2,0,0,2)
args4(3).Name = "OuterBorder.RightDistance"
args4(3).Value = 97
args4(4).Name = "OuterBorder.TopBorder"
args4(4).Value = Array(0,0,2,0,0,2)
args4(5).Name = "OuterBorder.TopDistance"
args4(5).Value = 97
args4(6).Name = "OuterBorder.BottomBorder"
args4(6).Value = Array(0,0,2,0,0,2)
args4(7).Name = "OuterBorder.BottomDistance"
args4(7).Value = 97
args4(8).Name = "InnerBorder.Horizontal"
args4(8).Value = Array(0,0,0,0,0,0)
args4(9).Name = "InnerBorder.Vertical"
args4(9).Value = Array(0,0,0,0,0,0)
args4(10).Name = "InnerBorder.Flags"
args4(10).Value = 0
args4(11).Name = "InnerBorder.ValidFlags"
args4(11).Value = 127
args4(12).Name = "InnerBorder.DefaultDistance"
args4(12).Value = 0

dispatcher.executeDispatch(document, ".uno:SetBorderStyle", "", 0, args4())


-----
Cdlt, 
Conil26 
Loo 3.3.4 / Win7
--
View this message in context: 
http://nabble.documentfoundation.org/Writer-Macro-formatage-de-tableau-tp3266372p3278294.html
Sent from the Users mailing list archive at Nabble.com.

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

Reply via email to