2011年4月25日月曜日

行の挿入

    
上記アクティブシートの三行目 (= 二行目の下) に三行追加するサンプル
コードを以下に記す :
  
Sub ExampleInsertRows()
       Dim objSheet As Object
       objSheet = ThisComponent.CurrentController.Activesheet
       objSheet.Rows.insertByIndex(2, 3)
End Sub
  
結果は下図の通り :
  
  
シートに行を挿入する場合は insertByIndex メソッドを用いる。
insertByIndex メソッドの書式は下記の通り :
  
insertByIndex(RowNumber, Lines)
  
RowNumber には (行を) 挿入したい行番号を指定する。行番号は 0
から始まるので、この例の場合三行目に追加したいので RowNumber
には 2 を指定する。
Lines には挿入したい行数を指定する。
insertByIndex メソッドは、戻り値を返さない。

0 件のコメント:

コメントを投稿