使用剪贴板复制/粘贴到 Excel

Question

使用剪贴板从 PDF 复制数据后。我在 clipboard 中有三个数据块，我想 Paste 每个在 Excel-2007 中的不同位置让我们说：

剪贴板 3 中的数据应该粘贴到 A1
剪贴板 2 中的数据应粘贴到 C1
剪贴板 1 中的数据应粘贴到 E1

VBA代码

 ActiveSheet.Paste

在这里不起作用，它只会粘贴最后复制的东西。 是否可以使用 Excel VBA 处理 Clipboard 以及如何处理？

Answer 1

我尝试使用宏记录器将一些内容复制到剪贴板并从那里粘贴。看到代码，我的意见是你的问题的答案是 "NO".

自己看一下代码，你会发现根本没有引用剪贴板位置：

Sub Makro2()
'
' Makro2 Makro
'

'
    Range("A2").Select
    Selection.Copy
    Range("A1").Select
    ActiveSheet.Paste
    Range("A3").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("A4").Select
    ActiveSheet.Paste
    Range("A5").Select
    Application.CutCopyMode = False
    Range("A4").Select
    Selection.Copy
    Range("A3").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("A2").Select
    Application.CutCopyMode = False
    Selection.Copy
    Range("A1").Select
    Application.CutCopyMode = False
    Selection.Copy
    Application.CutCopyMode = False
    Range("C4").Select
    ActiveSheet.Paste
    Range("C6").Select
    ActiveSheet.Paste
    Range("D13:D14").Select
    Range("D14").Activate
    ActiveSheet.Paste
    Range("C15").Select
    ActiveSheet.Paste
    ActiveSheet.Paste
    Range("A17").Select
    ActiveSheet.Paste
    Range("C18").Select
End Sub

使用剪贴板复制/粘贴到 Excel

Copy / Paste in Excel using clipboard

excel

clipboard

vba

excel-2007