【StarSuite Basic/OpenOffice.org Basic】

【StarSuite Basic/Op ..

48:デフォルトの名無しさん
07/06/30 13:45:08
>>6
Sub Hyou3Active
Dim oDocument As Object
Dim oSheet As Object
Dim oCController As Object

oDocument = ThisComponent
oSheet = oDocument.Sheets
oCController = oDocument.CurrentController

oCController.ActiveSheet = oSheet.getByName("表3")
End Sub

次ページ