2011年4月22日金曜日

セルの取得 (1)

下記はアクティブシートの B5 セルを、列番号と行番号を指定して取得する
サンプルコードである。
  
Sub ExampleGetCellByPosition()
       Dim objSheet As Object
       Dim objCell As Object
       objSheet = ThisComponent.CurrentController.ActiveSheet
       objCell = objSheet.getCellByPosition(1, 4)
       '
       'セル「B5」の値を表示する
Msgbox("セル「B5」の値 = " & objCell.Value)
End Sub
  
列番号、行番号を指定してセルを取得するには getCellByPostion メソッド
用いる。
getCellByPosition メソッドの書式は下記の通り :
  
getCellByPosition(ColumnRow)
  
Column には、取得したいセルの列番号を、Row には行番号を指定する。
Calcの場合、列番号、行番号とも 0 から始まる。つまり、列の場合だと A 列
の列番号は 0、B 列の列番号は 1、...となる。行番号も同様に、1 行目の行
番号が 0、2 行目の行番号は 1、...となる。特に行については、シートに表示
されている行番号と異なるので注意が必要である。
getCellByPosition メソッドは戻り値としてセルオブジェクトを返す。

0 件のコメント:

コメントを投稿