时间戳

首页 > 解决方案 > 在 Linux 中打开文件夹路径的 LibreOffice 基本命令

libreoffice-basic - 在 Linux 中打开文件夹路径的 LibreOffice 基本命令

问题描述

我有一个在 Windows 中创建的宏电子表格，它获取电子表格当前所在的文件夹路径，然后在该目录中打开一个文件夹。

我使用命令shell ("C:\Windows\explorer.exe",1,FolderPath)，其中“FolderPath”是要打开的最终文件夹路径的字符串。在 Linux 中是否有与此命令等效的命令，而当我使用它时，MAC OS 也是如此？

标签： libreoffice-basic

解决方案

首先，找到一种方法来找出您的宏在哪个操作系统上运行（提示：查看帮助）

Function OSName() As String
Dim keyNode As Object ' com.sun.star.configuration.ConfigurationAccess
    GlobalScope.Basiclibraries.LoadLibrary("Tools")
    keyNode = Tools.Misc.GetRegistryKeyContent("org.openoffice.Office.Common/Help")
    OSName = keyNode.GetByName("System")
End Function

现在您可以使用特定于每个系统的命令：

...
    Select Case OSName
        Case "WIN"
            OpenCommand = "explorer"
        Case "MAC"
            OpenCommand = "open"
        Case "UNIX"
            OpenCommand = "xdg-open"
    End Select
    Shell (OpenCommand, 1, FolderPath)
...

推荐阅读