[Macro] createCursorByCellName incorrecte

fr-users
#1

Bonjour,

Je ne trouve pas l'erreur sur ce simple script
sub es3
  Dim loComp, loText, loViewCursor, loCursor, loTable, loCellule

  loComp = thisComponent
  loText = loComp.getText
  
  loViewCursor = loComp.getCurrentController.getViewCursor
  loTable = loComp.createInstance("com.sun.star.text.TextTable")
  loTable.initialize( 1, 6)
  loText.insertTextContent( loViewCursor, loTable, false)
  loCursor = loTable.createCursorByCellName( "A1")
end sub

sur la dernière ligne, il me dit (Erreur d'exécution BASIC)
"Valeur de propriété incorrecte"...

Pourquoi ?
La table est bien créée dans le doc.
Dans XRay la propriété existe bien.

#2

Bonjour,

Quelle version de LibreOffice ?

En 6.3.2.2, ce script ne fonctionne pas dès la 2ème instruction !
thisComponent.getText n'existe pas.
thisComponent.getCurrentController.getViewCursor non plus !

Patrick

#3

Oups au temps pour moi, j'avais testé dans Calc mais ça fonctionne dans Writer !
et je n'ai pas d'erreur d'exécution !

#4

bonjour
ça fonctionne sans problème sous 6.2.7. / win10
Mais plante si le curseur est déjà dans un tableau ... Peut être est-ce ça.

#5

Bonjour,

Merci pour vos essais.

Je pars d'un document Writer qui ne contient que quelques paragraphes vides, curseur au milieu (~3ème paragraphe).

Je suis sous LO 6.2.7.1 / Win 8.1 (mon portable).

Ah ben je viens d'essayer en 6.2.6 sous Win7 (bureau) ça fonctionne !!

Bon je cherche autrement alors...

Merci

a+