☰

在 pdf 中插入“复制”按钮

tag-icon • tag-icon pdf libreoffice libreoffice-writer documents
在 pdf 中插入“复制”按钮

我想在 pdf 中添加一个按钮，点击后会将一些文本复制到剪贴板。可以吗？如果可以，怎么做？我正在使用 LibreOffice Writer。

答案1

您可以为此使用 LibreOffice Basic 宏并添加一个按钮：

Sub Main
    Dim strClipTxt,WshShell
    strClipTxt = InputBox("Please enter some text to add to clipboard:","Copy to clipboard")
    Set WshShell = CreateObject("Wscript.Shell")
    WshShell.Run("cmd /c echo " & strClipTxt & " | clip",0,True)
    ' Next line is omittable, to make silent
    MsgBox("Copying was successful!",64,"Copy to clipboard")
End Sub

这将在 Windows 环境中工作，用于clip.exe将文本添加到剪贴板。它将提示一个输入框，输入要添加到剪贴板的文本，然后将其添加到剪贴板。另一种方法是将文档中的选择添加到剪贴板：

Sub Main
    Dim WshShell
    Set WshShell = CreateObject("Wscript.Shell")
    WshShell.Run("cmd /c echo " & ThisComponent.CurrentSelection.getByIndex(0).String & " | clip",0,True)
End Sub

这会将当前选择添加到剪贴板。

关于在文档中添加按钮和其他表单控件的文档 - LibreOffice

相关内容