使用 VBA 和 Adob​​e PDF Reader 控件复制选定的文本

Posted 2023-03-22

【中文标题】使用 VBA 和 Adob​​e PDF Reader 控件复制选定的文本

【英文标题】：Copy Selected Text with VBA and the Adpbe PDF Reader Control

【发布时间】：2012-12-07 05:51:25

【问题描述】：

我正在尝试直接从我使用 Visual Basic 2010 中的 Adob​​e PDF 阅读器控件制作的 PDF 查看器中复制选定的文本。

我可以使用 Word 中的宏来使用高亮文本：

Private Sub CommandButton1_Click()
    Dim Sel As Selection
    Set Sel = Application.Selection
    If Sel.Type <> wdSelectionIP Then
    MsgBox Sel.Text
    End If
End Sub

我无法确定这段代码是否可用于通过 Adob​​e PDF Reader 对突出显示的文本执行操作。如果没有，有人知道我会怎么做吗？

【参考方案1】：

我认为 Adob​​e PDF 查看器不支持 VBA。

但是，我建议使用剪贴板的间接方法。

通过发送 control+c 键，选择的内容将被传输到剪贴板，剪贴板可以使用“本机”VBA 进行处理。

使用SendKeys("^C")发送一个control+c，见This link

剪贴板可以使用This exampe进行操作