[fr-discuss] Re: calc copie de feuille, référence de curseur

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 à discuss+help@fr.libreoffice.org 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