Suite...

pierre choffardet wrote
> 
> ici : 
> http://user.services.openoffice.org/fr/forum/viewtopic.php?f=8&t=32557&p=178949#p178949
> 
> on m'explique que le champ à modifier n'est accessible qu'en lecture seule
> 

Il faut accéder via le niveau supérieur. 

Ci-dessous un exemple rapide (il travaille sur  la sélection courante, donc
on suppose qu'on a sélectionné un contrôle en mode modification dans la
feuille).

Désolé, je n'ai pas le temps de développer davantage mais partir de cet
exemple :

option explicit

Sub Main

dim PysDoc as object, PysObj as object, PysVB as object
dim PysNamedValue as new com.sun.star.beans.NamedValue 
dim PysRef as new com.sun.star.table.CellAddress

PysDoc = thiscomponent
PysObj = thiscomponent.currentselection(0)

with PysRef
        .Column= 17     ' col R
        .Row= 8                 ' ligne 9
        .Sheet= 1               ' 2ème feuille du classeur
end with

PysNamedValue.Name  = "BoundCell" 
PysNamedValue.Value = PysRef

PysVB = PysDoc.createInstance("com.sun.star.table.CellValueBinding") 
PysVB.Initialize(Array(PysNamedValue)) 
PysObj.control.setValueBinding(PysVB)

msgbox "fini"

End Sub


Cordialement
Pierre-Yves

--
View this message in context: 
http://nabble.documentfoundation.org/calc-copie-de-feuille-reference-de-curseur-tp3775991p3776861.html
Sent from the Discuss mailing list archive at Nabble.com.

-- 
Envoyez un mail à [email protected] pour savoir comment vous 
désinscrire
Les archives de la liste sont disponibles à 
http://listarchives.libreoffice.org/fr/discuss/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne 
pourront pas être supprimés

Répondre à