dポイントプレゼントキャンペーン実施中!

エクセルVBAについて

sheet1でフィルターをかけた結果からsheetNewへコピーしたいと思い、以下のコードを実行させました。 sheet1.Range("A2:CW2000").Copy
sheetNew.Range("A9:CW2007").PasteSpecial Paste:=xlPasteValues

すると、貼り付け先では1行のみしか張り付きません。
問題点があればおしえていただけますでしょうか。

質問者からの補足コメント

  • A9だけにすると、全ての行に先頭の行の情報がペーストされます。

    No.1の回答に寄せられた補足コメントです。 補足日時:2022/06/09 08:33

A 回答 (3件)

あ、忘れてた。


sheetNew.Range("A9").PasteSpecial Paste:=xlPasteValues
    • good
    • 0

sheet1.Range("A2:CW2000").SpecialCells(xlCellTypeVisible).Copy



とか?
    • good
    • 0

貼り付け先の指定を範囲ではなくA9だけにしてもダメなんでしたっけ?

この回答への補足あり
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!