使用宏将excel中的特定列复制到新工作表

Question

我正在尝试选择并将特定的整个列从一个工作表复制到另一个工作表但是无法执行此操作，下面是代码：

Sheets("Sheet3").Range("B1").Value = Sheets("Sheet2").Range("G1").Value

任何想法我们如何设置整个列范围？

Answer 1

要复制整列，而不是

Sheets("Sheet3").Range("B1").Value = Sheets("Sheet2").Range("G1").Value

写

Sheets("Sheet3").Range("B:B").Value = Sheets("Sheet2").Range("G:G").Value

并保留数字格式写 -

Sheets("Sheet3").Columns("B").NumberFormat = "General"

<强> __________________________________________________________________________

您甚至可以将Column用作：

Sheets("Sheet3").Columns("B").Value = Sheets("Sheet2").Columns("G").Value

<强> __________________________________________________________________________

您也可以将Copy用作：

Sheets("Sheet2").Columns("G").Copy Sheets("Sheet3").Columns("B")

Answer 2

你可以

Sheets("Sheet2").Columns("G").copy Sheets("Sheet3").Columns("B")

或

Sheets("Sheet3").Columns("B") = Sheets("Sheet2").Columns("G").Value

如果要复制多个已连接的列，可以执行

Sheets("sheet2").Columns("G:H").copy sheets("Sheet3").Columns("B:C")

将其保留为常规格式，您可以添加

Sheets("Sheet2").Columns("G").NumberFormat = "General"