Libre:051 アクティブセルのアドレスを表示する

ちょっとハマりました。

それは、_c_, _r_の型の指定です。

Object型にすると、エラーになります。

必ずString型としてください。

 

sub ksShowCellAdress

dim cell as object
dim _c_ as string
dim _r_ as string

cell = ThisComponent.CurrentSelection
with cell.getCellAddress
_c_ = .Column
_r_ = .Row
msgbox _c_ & “:” & _r_
end with


end sub