0

我想在我的电子表格中选择最后一列和倒数第二列。

我通过以下方式找到了我的最后一个专栏:

LastColumn = Sheets("Sheet1").Cells.Find("*", [a1], , , xlByColumns, xlPrevious).Column
    On Error GoTo 0

然后我尝试使用 LastColumn 从倒数第二列到最后一列进行选择并复制和粘贴。

Sheets("Sheet1").Columns(LastColumn - 1:LastColumn).Select

但它似乎不起作用。有人可以帮忙吗,我可能出了什么问题。

谢谢

4

1 回答 1

1

Sheets("Sheet1").Columns(LastColumn - 1).Select

编辑:感谢道格指出我的错误......

Sheets("Sheet1").Columns(LastColumn - 1).Resize(,2).Select

于 2012-07-24T01:56:43.767 回答