よねさんのWordとExcelの小部屋　なんでも掲示板

HOME HELP 新規作成 新着記事 ツリー表示 トピック表示 検索 過去ログ

■13450 / 1階層) 　質問　複数シート内データコピー
□投稿者/ よねさん -(2020/06/22(Mon) 16:37:04)
    2020/06/22(Mon) 16:58:20 編集(投稿者)
    2020/06/22(Mon) 16:43:34 編集(投稿者)

    書き込みに気付くのが遅くなり、申し訳ありません。
    http://www.eurus.dti.ne.jp/~yoneyama/Excel/vba/vba_data_matome.html
    のSub matome()に書いてあるコピーはセルをそのままコピー、貼り付けしていますので、
    Range(Cells(2, 1), Cells(lRow, lCol)).Copy　Worksheets(1).Cells(lRow2, 1)
    ↓
    値の貼り付けに書き換えればいかがでしょう?
    Range(Cells(2, 1), Cells(lRow, lCol)).Copy
    Worksheets(1).Cells(lRow2, 1).PasteSpecial xlPasteValues


    (修正します)
    ファイルをコピーしておき、このコピーファイルで不要なシートを削除して、データをまとめるVBAを動かします。
    データをまとめることができたら、
    まとめたシートを元のファイルへ移動またはコピーするのはいかがでしょう?

記事引用 削除キー/

前の記事(元になった記事) 次の記事(この記事の返信)
←質問　複数シート内データコピー /yunao Mail →Re[2]: 質問　複数シート内データコピー /yunao Mail
　
上記関連ツリー

Nomal 質問　複数シート内データコピー / yunao Mail (20/06/20(Sat) 18:56) #13449
└Nomal 質問　複数シート内データコピー / よねさん (20/06/22(Mon) 16:37) #13450 ←Now
  └Nomal Re[2]: 質問　複数シート内データコピー / yunao Mail (20/06/22(Mon) 21:28) #13451
    └Nomal Re[3]: 質問　複数シート内データコピー / よねさん (20/06/23(Tue) 08:53) #13452
      └Nomal Re[4]: 質問　複数シート内データコピー / yunao Mail (20/06/23(Tue) 21:54) #13453
        └Nomal Re[5]: 質問　複数シート内データコピー / よねさん (20/06/24(Wed) 08:07) #13454
          └Nomal Re[6]: 質問　複数シート内データコピー / yunao Mail (20/06/24(Wed) 20:16) #13455
            └Nomal Re[7]: 質問　複数シート内データコピー / よねさん (20/06/25(Thu) 07:44) #13456
              └Nomal Re[8]: 質問　複数シート内データコピー / yunao Mail (20/06/26(Fri) 19:40) #13457

All 上記ツリーを一括表示 / 上記ツリーをトピック表示
　
上記の記事へ返信
Pass/

HOME HELP 新規作成 新着記事 ツリー表示 トピック表示 検索 過去ログ

- Child Tree -