OOo Basic で Calc をあんな事やこんな事にしたい(ループ)
http://hermione.s41.xrea.com/pukiwiki/index.php?OOoBasic%2FCalc%2Fcell#ceccbb4a繰りかえし処理
セル範囲にあるすべてのセルを順に処理するときには大抵、次のようにします。
Sub cell_11 oDoc = ThisComponent oSheet = oDoc.getSheets().getByIndex(0) oCellRange = oSheet.getCellRangeByPosition(0,0,3,5) aRangeAddress = oCellRange.getRangeAddress() nCols = aRangeAddress.EndColumn - aRangeAddress.StartColumn nRows = aRangeAddress.EndRow - aRangeAddress.StartRow For i = 0 To nRows Step 1 For j = 0 To nCols Step 1 msgbox oCellRange.getCellByPosition(j,i).String Next Next End Sub
このサンプルから,ループ回数を固定値にする方法が判る.
Sub cell_11 oDoc = ThisComponent oSheet = oDoc.getSheets().getByIndex(0) rem oCellRange = oSheet.getCellRangeByPosition(0,0,3,5) rem aRangeAddress = oCellRange.getRangeAddress() nCols = 5 nRows = 14 For i = 0 To nRows Step 1 For j = 0 To nCols Step 1 msgbox oSheet.getCellByPosition(j,i).String Next Next End Sub
次は,String をカンマ区切りの3値に分かつ方法を探す.