在计算宏中使用由突出显示的单元格而不是绝对单元格引用确定的范围

Question

简单的请求：我有包含多个数据表的计算表，需要按我定义的值排序（此UserDefIndex已全部设置）？我希望找到一种写宏的方法，该宏将在我突出显示的单元格上执行这种排序，而不是绝对单元格地址

我已经浏览了所有这些内容，但是术语过于晦涩，很难理解代码。

• http://www.debugpoint.com/2015/07/get-the-selection-cell-and-range-address-using-macro-in-libreoffice/
• http://www.pitonyak.org/oo.php

• https://opensource.com/article/18/2/variables-data-types-libreoffice-basic

  sub sorts_stats雷姆------------------------------------------------- ---------------------rem定义变量暗淡的文档作为对象昏暗的调度程​​序作为对象

  rem ----------------------------------------------- -----------------------rem可以访问文档文档= ThisComponent.CurrentController.Framedispatcher = createUnoService（“ com.sun.star.frame.DispatchHelper”）

  rem ----------------------------------------------- -----------------------将dim args1（0）作为新的com.sun.star.beans.PropertyValueargs1（0）.Name =“ ToPoint”args1（0）.Value =“ $ A $ 3：$ D $ 18”

  dispatcher.executeDispatch（document，“ .uno：GoToCell”，“”，0，args1（））>

由于范围的大小会有所不同，因此我如何定义突出显示的单元格区域，而不是“ $ A $ 3：$ D $ 18”？

简单的请求：我有包含多个数据表的计算表，需要按我定义的值排序（此UserDefIndex已全部设置）？我希望找到一种写宏的方法，... ...>

Answer 1

您可以手动选择范围，然后获取选择范围

Doc = ThisComponent
Sheet = Doc.Sheets(0)
rng = Doc.CurrentSelection