前提・実現したいこと
集計データをフォーマットに転記する簡単な処理です。
フォーマットは複数シートの構成で転記先は1番目のシートになります。
が、なぜか転記すると2番目のシートも同時選択されて転記されてしまいます。
ソースを一行ごと確かめましたが
転記する直前までシートは1番目しか選択されていません。
転記のプロセスを行うと2番目のシートも同時選択されてしまいます。
今までこのような状況に遭遇したことがなく
なぜなのか全くわかりません。
アドバイスいただければ幸いです。
発生している問題・エラーメッセージ
1枚のシートに転記しようとすると複数シートにコピーされてしまう。
エラーメッセージ
excel VBA
wbRawData.Worksheets("xxxxxxxx").Range("A1:D19").Copy
wbReport.Worksheets("yyyyyyyy").Activate 'ここまでは確実に1シート選択
Range("E3").PasteSpecial Paste:=xlPasteValues 'これを行うと2枚目も同時選択されている。
With wbReport.Worksheets("yyyyyyyy") .Activate .Range("E3").PasteSpecial Paste:=xlPasteValues .その他書式編集 end with 最初はこのように記述していましたが上の現象が起きたのでActivateのみ外に出してみたりもしました。(変わらないとは思いつつ) ### 補足情報(FW/ツールのバージョンなど) ここにより詳細な情報を記載してください。
「'これを行うと2枚目も同時選択されている。」の部分で選択されているのはどのブックのどのシートのことですか?
言葉足らずですみません。
wbReport.Worksheets("yyyyyyyy")がコピー先のシートで、同時に選択されてしまうのは
このwbReportの"yyyyyyyy"の右隣のシートです。
1行前のActivateで処理を止めて確認しましたが
そこまでは確実に"yyyyyyyy"のシートしか選択されていないのに
ペーストを実行して確認すると2シートがグループ化されているのです。
どうしてなのか全くわからないです。
回答3件
あなたの回答
tips
プレビュー