將選擇調整爲數據中的最後一行

我有一個Excel VBA宏，需要將選擇從單元格A3:K3複製到列L中的最後一行數據。我這拿到最後一個單元格將選擇調整爲數據中的最後一行

Dim lastcell As Long 
lastcell = ActiveSheet.Range("L" & cell.Count).End(xlUp).cell

我想我必須再偏移左邊一個，調整選擇，以列，至多到最後填寫一行。可能有不同的方式做這個，可能是一些如何將最後一行保存爲數據的最後一行，然後選擇到最後一行的A3:k3。

來源

2015-04-03 Katherine Pacheco

該副本列一個通過ķ行通過lastcell到另一個工作表：

Sub qwerty() 
    Dim lastcell As Long 
    lastcell = ActiveSheet.Range("L" & Rows.Count).End(xlUp).Row 
    Range("A3:K" & lastcell).Copy Sheets("Sheet2").Range("A1") 
End Sub

來源

2015-04-03 21:00:23

很奇怪，這是不是爲我工作由於某種原因，coipies高達31次排就好像它認爲這是最後一個單元格，在數據中沒有看到任何會導致該問題的特別錯誤 – 2015-04-06 14:12:02

其實我只是意識到你的代碼所做的事情，我需要將a2：k2從a3：k3複製到最後一行數據（列L中的最後一行） – 2015-04-06 16:08:07

將選擇調整爲數據中的最後一行

回答

相關問題