OOobbs/73

OOobbs/73

• サマリ: sheetオブジェクトから、sheetIndexは取得できない？
• 環境: Calc
• 状態: 解決
• 投稿者: しいな?
• 投稿日: 2005-06-27 (月) 15:21:21

質問

ThisComponent.getSheets().getByName("表2") のように取得したオブジェクトから、シートインデクッスを取得できないのでしょうか？また、同様に、シート指定はシート名前で指定し、そのシートのインデックスを取得する方法が他にあるのでしょうか？ また、それぞれの文章に対してのアクセスの為の書式構造がさっぱりわかりません。 http://www.opendt.org/pukiwiki/pukiwiki.php?Translation にある「デベロッパーズガイド翻訳一式」を読めばいいのでしょうか？「OpenOffice.org Basic」利用からだけあればよいのですが、どのように習得していったらいいのかわかりません。答えではなく、習得手法で結構ですので、教えていただけませんでしょうか？

回答

• OOobbs/71 にはアクティブシートのインデックスを取得する方法が載っています。

これを使って、

Sub sheetindex()
Dim oDoc As Object, oController As Object
Dim oSheets As Object, oSheet As Object
Dim sActiveSheetName As String
Dim i As Integer
  oDoc = ThisComponent
  oSheets = oDoc.getSheets()
  oSheet = oSheets.getByName("表2")
  sSheetName = oSheet.Name
  For i = 0 To oSheets.getCount() -1
    If oSheets.getByIndex(i).Name = sSheetName Then
      MsgBox i
      Exit For
    End If
  Next i
End Sub

のようにします。

シートオブジェクトから直接シートのインデックスを取得するために使用できるプロパティーもしくはメソッドはありません。

• はにゃ?? 2005-06-27 (月) 17:25:53

• ありがとうございます。自前で作るしかないのですね。また、すでに同様のサンプルが乗っているのに気づかず申し訳ありませんでした。 -- しいな? 2005-06-27 (月) 18:29:33