Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

533 / 76807

←次へ　｜　前へ→


	【81941】Re:シート間のデータコピーでエラー

ackkn - 22/1/29(土) 10:45 -


	引用なし

	パスワード

▼マナさん：

確認しました。
微妙に動作が違います。　下記コードの上3行がC列までのコピーですが、
マナさん仰るとおり、Rmaxがなくても行けましたが、選択範囲の下に1行空白行が
選択されます。

また、その下のコード3行がE列以降のP列までをコピーしたいのですが、
この　r1.Resize(, 16).Offset(1, 0).Copy　部分の記述の仕方が分かりません。

しかし、上記同様、選択範囲の下に1行空白行が選択されます。

よろしくご教示下さい。

r1.Resize(, 3).Offset(1, 0).Copy
ws2.Range("A" & ws2.Cells(Rows.Count, 1).End(xlUp).Row + 1). _
PasteSpecial (xlPasteAll)

r1.Resize(, 16).Offset(1, 0).Copy
ws2.Range("E" & ws2.Cells(Rows.Count, 5).End(xlUp).Row + 1). _
PasteSpecial (xlPasteAll)

5 hits

▼

【81927】シート間のデータコピーでエラー ackkn 22/1/26(水) 14:35