Calcシート内の値があるすべてのセルを範囲とするプロパティ
Posted: 12月 27, 2008, 12:00 am
openoffice のマクロ言語についてお聞きしたいのですが
Calcシートにびっしりと数値を入力している場合
その中の最終の行番号や列番号を表すためにはExcelなら
Worksheetオブジェクトの値があるすべてのセルを範囲とする UsedRange プロパティというものがあり
Sub CellCnt()
Dim lngYCnt As Long
Dim intXCnt As Integer
lngYCnt = Worksheets("Sheet1").UsedRange.Rows.Count
intXCnt = Worksheets("Sheet1").UsedRange.Columns.Count
MsgBox "最終行は" & intYCnt &"行、" & _
"最終列は" & lngXCnt & "列です"
End Sub
のように使うらしいですが
UsedRangeのようなプロパティはopenofficeに存在するのですか。
またそれは 「.プロパティ.Rows.Count」 や 「.プロパティ.Columns.Count」 のように使っても良いのですか。
Calcシートにびっしりと数値を入力している場合
その中の最終の行番号や列番号を表すためにはExcelなら
Worksheetオブジェクトの値があるすべてのセルを範囲とする UsedRange プロパティというものがあり
Sub CellCnt()
Dim lngYCnt As Long
Dim intXCnt As Integer
lngYCnt = Worksheets("Sheet1").UsedRange.Rows.Count
intXCnt = Worksheets("Sheet1").UsedRange.Columns.Count
MsgBox "最終行は" & intYCnt &"行、" & _
"最終列は" & lngXCnt & "列です"
End Sub
のように使うらしいですが
UsedRangeのようなプロパティはopenofficeに存在するのですか。
またそれは 「.プロパティ.Rows.Count」 や 「.プロパティ.Columns.Count」 のように使っても良いのですか。