Question

Excel VBA中如何复制多个单元格的内容到数组中

比如我要实现效果是复制a1,a2,a3三个单元格的内容到一个数组中，vba语句怎么写呢？分没有了，望大家指教，谢谢各位。

Answer 1

追问

现在遇到的问题是怎样将剪切板中的数据赋值到数组变量中？和怎样将数组中的数据放到系统剪切板，然后再在excel中执行粘贴操作。谢谢！

追答

有数组了还要这么复杂，你最终目的是什么？

追问

想实现：复制连续单元格的内容，然后将之顺序粘贴到不连续的单元格中这个操作。

Answer 2

arr=range("a1:a3")

追问

我想实现从复制这个动作开始开始一直到把内容粘贴到剪切板的这个操作过程的vba。
Sub Macro1()
Range("A1:A3").Select
Selection.Copy
arr=range(ActiveSheet.Paste);‘这句不对，应该怎么改正呢?
Range("D8").Select
ActiveSheet.Paste
End Sub