行的VBA複製範圍

Question

是否可以複製行的範圍並將其粘貼到其他表中？ 我試過，但我得到1004的錯誤：

.Rows(i_cls_frst_row, i_cls_last_row).Copy 

問候 米哈爾

Answer 1

這是你正在嘗試的嗎？

如果你有一個像i_cls_frst_row=1和i_cls_last_row=3非連續的行，你要複製兩行那就試試這個

Range(i_cls_frst_row & ":" & i_cls_frst_row & "," & _ 
     i_cls_last_row & ":" & i_cls_last_row).Copy 

如果你試圖複製從i_cls_frst_row到i_cls_last_row那就試試這個

Rows(i_cls_frst_row & ":" & i_cls_last_row).Copy 

Answer 2

是的，改變你的線

.Rows(i_cls_frst_row, i_cls_last_row).Copy 

到：

.Rows(i_cls_frst_row & ":" & i_cls_last_row).Copy 

再後來就你可以將它粘貼到你需要的地方

Answer 3

您可以定義一個Range對象並選擇所需的所有行/行作爲範圍

Dim example As Range 
Set example = Range("A1:E1") 
example.Select 
Selection.Copy