复制和过去最后使用的列范围到下一列范围

时间:2015-07-13 16:29:10

标签: excel-vba vba excel

我是VBA上的新手,我在复制时遇到问题,并且在阅读上一篇文章时,将最后一个使用过的列放在新列范围内,它只是特定的复制并将整个列放到下一列中,如下所示

openjdk version "1.8.0_45"
OpenJDK Runtime Environment (build 1.8.0_45-b13)
OpenJDK 64-Bit Server VM (build 25.45-b02, mixed mode)

从上面的代码中,我可以将整个列复制到下一列和硬编码上一列,但我不知道如何只复制行中的某些范围,例如:列E,仅复制第5行: 10。请在这件事上帮助我。

还有一件事,如果我需要在另一个活动工作表中创建Macro Bottom,代码更改是什么?

1 个答案:

答案 0 :(得分:0)

Private Sub CommandButton1_Click()
  Dim col As Integer
  col = Range("A1").End(xlToRight).Column
  Range(Cells(5, col), Cells(10, col)).Copy Destination:=Range(Cells(5, col + 1), Cells(10, col + 1))
End Sub