Hello Jörg,
Use the dispatcher.
Dim dispatcher As Object, curWin As Object
Dim args(0) As New com.sun.star.beans.PropertyValue
curWin = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
args(0).Name = "Tables"
args(0).Value = Array(1,2,4) ' list of sheet numbers to select
dispatcher.executeDispatch(curWin, ".uno:SelectTables", "", 0, args())
Regards
Bernard
Message de Jörg Schmidt date 2014-08-12 08:57 :
> Hello,
>
> I want to select multiple sheets in Calc simultaneously with StarBasic.
> Is there only the indirect method via the range-object? for example: https://forum.openoffice.org/en/forum/viewtopic.php?f=20&t=45389&hilit=select+sheets#p209791
>
---------------------------------------------------------------------
To unsubscribe, e-mail: api-unsubscribe@openoffice.apache.org
For additional commands, e-mail: api-help@openoffice.apache.org
|