|
パンさん
ありがとうございます。
コピーしたデータは、結果集計ファイルの同一のシートに貼り付けたいと思っておりました。
ファイル名のtest A・B・Cは、固定ではなく自由に変えられればと思っております。(例えば、test A9月25日版 等)その際には、
A(0)=”test A”
というのをどのように変更すればよろしいのでしょうか?
初歩的な質問で申し訳ございません。
▼パン さん:
>▼素人 さん:
>方法は色々ありますが、コピーしたデーターはどちらにすればいいのでしょうか?
>結果集計ファイルの同一シート(SHEEt1)に3つとも張り付け、別々のシートに
>新しいシートを作り貼り付け。
>単純に行くなら下でも良いですけど。
>
>
>dim A(2) as string
>A(0)="testA"
>A(1)="testB"
>A(2)="testC"
>for X=0 to 2
> With Workbooks.Open(A(X) &".xls") '''''コピーデーター
>
> .Sheets(1).Range("A1:BZ300").Copy ’’’範囲
> ThisWorkbook.Activate
> Sheets(1).Select ’’’’左から1番目のシート
> Range("A1:BZ300").PasteSpecial Paste:=xlPasteAll
> Application.CutCopyMode = False
> .Close SaveChanges:=False
> End With
>
>next x
|
|