如何将这一行 VBA 转换为 LibreOffice Basic?

How do I convert this line of VBA into LibreOffice Basic?

如何转换 VBA

 With Worksheets("Sheet1")
        .Range("A1:A10").Copy
        .Range("D1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
    End With

使用选项 VBA支持 1

到 LibreOffice Basic

我认为这可行,但 PasteSpecial 的工作方式与 Excel 不同,我看不到任何模式。

你可以这样编码

With ThisComponent.getSheets().getByName("Sheet1")
    .getCellRangeByName("D1:D10").setDataArray(.getCellRangeByName("A1:A10").getDataArray())
End With