下面的代码给出了一个错误，但是当我将范围更改为 .Range(A2:A9999) 时有用...
但它很丑。有没有办法从 A2 和向下获取列 (A) 中的所有数据？并将其复制到B2？
Sheets("AA").Range("A2:A").Value = Sheets("BB").Range("B2:B").Value
最佳答案
要将它放在一行中，您可以按如下方式进行:
Sheets("AA").Range("A2", Cells(Rows.Count, "A")).Copy Sheets("BB").Range("B2")
顺便说一句，它会复制所有内容，不仅是值，还包括格式。要运行它，您的工作表 AA 应该是事件的。
关于vba - 范围错误的 Excel VBA - 快速修复？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/17581601/