2016-08-24 131 views
1

是否可以複製行的範圍並將其粘貼到其他表中? 我試過,但我得到1004的錯誤:行的VBA複製範圍

.Rows(i_cls_frst_row, i_cls_last_row).Copy 

問候 米哈爾

+0

您需要發佈更多的代碼。只用一行來判斷錯誤來自哪裏是不可能的。 – Comintern

回答

2

這是你正在嘗試的嗎?

如果你有一個像i_cls_frst_row=1i_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_rowi_cls_last_row那就試試這個

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

有史以來第一次輸入比你快:) –

+0

真的......但我涵蓋了兩種情況;) –

+0

非常感謝。 :) – Eswemenasja

2

是的,改變你的線

.Rows(i_cls_frst_row, i_cls_last_row).Copy 

到:

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

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

0

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

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