Alle 12:24, domenica 12 febbraio 2006, Bart Aimar ha scritto:
> sUrl2 = ConvertToUrl (sUltimus) ' url di Computo
>
> oTargetDoc= StarDesktop.LoadComponentFromUrl(sUrl2, "_default", 0, Array())
> oTargetSheet= oTargetDoc.getSheets.getByName("servizio1")' nome della
> 'sheet dove incollare
>
> oTargetCell = oTargetSheet.getCellByPosition(41,3)
> oTargetDoc.getCurrentController().Select(oTargetCell)
>
> print "Controlla dove sei..." ' interruzione di controllo della poizione
> ... zot...
> REM**************************************************
Ciao Bart
Ho messo il tuo codice in una macro(vedi sotto), ho messo la macro
nelle macro personali, l' ho collegata ad un pulsante sulla barra
dimenticavo, prima ho creato un documento con un foglio con nome
servizio1 e l' ho salvato
Uso Mandriva 2006 e OOo-2.0.1 e tutto funziona regolarmente
la cella (41,3) viene selezionata
Il secondo parametro di LoadComponentFromUrl() come puoi vedere
è "_blank" invece che "_default" con questo parametro lascia aperta anche
l' applicazione da dove è partito il comando
Comunque funziona con tutti e due i parametri
Per quello che credo di capire il problema può essere nella variabile passata
a ConvertToUrl()
Prova a mettere il punto di interruzione a sUrl2 per vedere come viene
impostata
Sub Prova3()
Dim oTargetDoc As Object
Dim oTargetSheet As Object
Dim oTargetCell As Object
Dim sUrl2 As String
sUrl2 = "file:///home/berna/Documents/Prova3.ods" ' url di Computo
oTargetDoc= StarDesktop.LoadComponentFromUrl(sUrl2, "_blank", 0,
Array())
oTargetSheet= oTargetDoc.getSheets.getByName("servizio1")' nome della
'sheet dove incollare
oTargetCell = oTargetSheet.getCellByPosition(41,3)
oTargetDoc.getCurrentController().Select(oTargetCell)
End Sub
Ciao Lido
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
