VBA行の範囲

Question

行の範囲をコピーして他のシートに貼り付けることは可能ですか？ 私はこれを試してみたが、私は1004エラーを取得：後に続いて

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

：

.Rows(i_cls_frst_row, i_cls_last_row).Copy 

よろしく のMichał

Answer 1

これはあなたが試していることですか？あなたはi_cls_frst_row=1とi_cls_last_row=3のような非連続的な行を持っていて、2つの行をコピーしようとしている場合は、この

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

を試し、その後 i_cls_frst_rowから i_cls_last_rowにコピーしようとしている場合

は、この

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

を試してみてください

Answer 2

はい、に

.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