如何从 OnContentChanged 事件获取 LibreOffice calc 中的 XRange？

编程问答 2022-05-27

问题描述

我需要在 LibreOffice calc (7.1) 中的 OnContentChanged 事件上获取 ooo.vba.excel.xrange 类型的对象，以便在 Application.Intersect 函数中使用。我已经浏览了 IDL 定义文件/libreoffice 帮助/博客等，但找不到任何方法。有谁知道 LibreOffice calc 中的电子表格.Range[r,c] 的等价物？

Sub OnContentChange(event)
    Dim odoc As Object
    Dim oCellAddress As Object
    Dim oSheet As Object
    Dim xrange As Object
    odoc = ThisComponent
    oCellAddress = event.getCellAddress()
    oSheet = odoc.Sheets(oCellAddress.Sheet)
    
    xrange = oSheet.??(oCellAddress.Row,oCellAddress.Column) ' Todo get xrange NOT XCellRange

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

basicbasicbasiclibreofficevba