Bonjour, j'ai créé un tableau dans une feuille writer, mais j'aimerais que la 1ère ligne ne soit pas une ligne de titre, pour l'instant je n'ai pas trouvé d'autre solution que de supprimer (ou reformater) la 1ère ligne, existe-t-il un argument dans l'instruction insertTextContent permettant de créer directement un tableau sans ligne titre et sans avoir recours à un tableau  du genre :
dim args1(3) as new com.sun.star.beans.PropertyValue
...............
args1(3).Name = "Flags"
args1(3).Value = 9?
 
Sub CreatTableau
Dim MonDocument As Object
Dim MonTableau As Object
Dim  matabcursor As Object
Dim  maCellule As Object
Dim i as Integer, X As Integer
Dim MonTexte As Object
Dim LesLignes As Object
 
MonDocument = ThisComponent
MonTexte = MonDocument.Text
matabcursor= MonTexte.createTextCursor
 
For i = 1 to 10 'passer les 10 1ères lignes
   matabcursor.gotoNextparagraph(false) ' saute de paragraphe en paragraphe afin de se positionner au bon endroit
next i 
 
MonTableau=MonDocument.CreateInstance("com.sun.star.text.TextTable") 'appelle l'objet tableau
          
MonTableau.initialize(6,5)      'cree le tableau nombre de : lignes, dont ligne titre, colonnes
MonTexte.insertTextContent(matabcursor, MonTableau, false) 'insère le tableau
'Suppression Première Ligne
LesLignes = MonTableau.Rows
LesLignes.removeByIndex(0,1)
 
Merci pour votre aide.
 
Cathy

Répondre à