|
▼kanabun さん:
>▼kami さん:
>
>>データーを各シート(20枚以上)のセルに転記する時、
>>シートをアクティブにしないですることは出来ますか?
>
>コピー元範囲、貼りつけ先範囲のまえにシートを指定してあげたら
>アクティブにしなくて済みます。
>
>Worksheets("Sheet1").Range("A1:D30").Copy _
> Worksheets("先Sheet").Range("A65536").End(xlUp).Offset(1)
>
>とか
>
> Worksheets("Sheet1").Range("A1:D30").Copy
> Worksheets("先Sheet").Range("A65536") _
> .End(xlUp).Offset(1).PasteSpecial xlPasteValues
>
>のように。
kanabunさん、早速のご回答いただきながら御礼が
遅くなり真に申し訳ございません。
どこを探してもこの様な事は記されておりませんでしたが、
お陰さまで解決出来ました。
本当にありがとうございました。
まずは御礼まで
|
|