如何将这行 VBA 转换为 LibreOffice Basic？答案

【问题标题】：How do I convert this line of VBA into LibreOffice Basic?如何将这行 VBA 转换为 LibreOffice Basic？
【发布时间】：2021-02-02 16:33:42
【问题描述】：

如何转换 VBA

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

到带有选项 VBASupport 1 的 LibreOffice Basic

我认为这会起作用，但 PasteSpecial 的工作方式与 Excel 中的不同，我看不到任何模式。

【问题讨论】：

标签： excel vba libreoffice basic

【解决方案1】：

你可以这样编码

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

【讨论】：

谢谢@JohnSUN！