2012-07-24 99 views
0

我想選擇電子表格中的最後一列和最後一列。Excel VBA - 選擇最後使用的列

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

然後我嘗試使用LastColumn從2日最後一列到最後一列中選擇和複製和粘貼:

我已經找到了我的最後一列。

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

但它似乎沒有工作。有人可以請幫助,我可能出了什麼問題。

感謝

回答

1

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

編輯:感謝道格指出我的錯誤...

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

+0

添,HLB試圖選擇最後兩列,我相信。 – 2012-07-24 02:38:24