使用剪贴板在Excel中复制/粘贴

Question

使用剪贴板从PDF复制数据后。我在clipboard中有三个数据块，我想在Paste中的不同位置Excel-2007分别说：{/ p>

• 剪贴板3中的数据应粘贴到A1

• 剪贴板2中的数据应粘贴到C1

• 剪贴板1中的数据应粘贴到E1

VBA代码

 ActiveSheet.Paste 

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

Answer 1

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

自己查看代码，您将看到根本没有引用剪贴板位置：

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