Re: [prog] Evènement

Mon, 16 Jan 2006 12:51:40 -0800

Merci Laurent pour cette réponse si rapide, c'est super et nickel chrome.
 
Pour le tablOOo, j'ai aussi essayé ça
 
Sub creerTableauDansWriter_formatagePremiereLinge
Dim Curseur As Object , laTable As Object ,Cellule As Object
Dim X As Integer

Curseur = ThisComponent.getText().createTextCursor()
   
laTable = ThisComponent.createInstance( "com.sun.star.text.TextTable" )
laTable.initialize(5, 5 )
ThisComponent.getText().insertTextContent(Curseur,laTable, False )


For X= 0 To laTable.getColumns.Count - 1
   Cellule = laTable.getCellByPosition(X,0)
   Curseur = Cellule.createTextCursor()
   
   With Curseur
      .ParaAdjust = com.sun.star.style.ParagraphAdjust.LEFT
      .CharWeight = 100
      .CharPosture = com.sun.star.awt.FontSlant.NONE
   End With
Next X
End Sub
 
toujours pas très puriste, sinon y'a aussi l'enregistrement automatique.
 
En fait, je cherchais juste s'il existait une propriété à utiliser,
(p252 de la Bible, je lis : "le tableau 11-17 liste les principales propriétés de tableau"),
mais apparemment c non.
 
Merci.
 
Cathy
----- Original Message -----
Sent: Monday, January 16, 2006 9:37 PM
Subject: Re: [prog] Evènement

Re

> Agrrrreu! Message : propriété ou méthode introuvable!!!
> Merci pour l'idée.
>

Sub Main

if
thisComponent.supportsService("com.sun.star.sheet.SpreadsheetDocument")
then
print "ok"
endif

End Sub

> Pendant que j'y suis, j'avais posé cette question, mais g pas u de réponse :
> 
> je voudrais insérer un tableau dans un document Writer, j'ai donc écrit
> ceci :
>

as tu essayer de changer le style de paragraphe ou de cellule des apres
insertion ?

--
Laurent Godard <[EMAIL PROTECTED]> - Ingénierie OpenOffice.org
Indesko >> http://www.indesko.com
Nuxeo CPS >> http://www.nuxeo.com - http://www.cps-project.org
Livre "Programmation OpenOffice.org", Eyrolles 2004

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Répondre à