●EXCEL・VBA質問スレ Part2●

●EXCEL・VBA質問スレ ..

115:デフォルトの名無しさん
07/06/12 01:28:42
質問です。
Excel2000で以下のようにあるブックから新しいブックを作り
セルをCopyメソッドを使用してコピーしようとすると
「RangeクラスのCopyメソッドが失敗しました」と
エラーになってしまうのですが
CopyとPasteメソッドをつかってそれぞれのブックを
Activateにしてコピーしないと無理でしょうか？

Dim xlsApp As Excel.Application
Set newBook = Excel.Application

With newBook

Set newBk = .Workbooks.Add

～編集処理～

Workbooks(ブック１名称).Activate

Workbooks(ブック１名称).Application.Worksheets(シート名).Range("A1:A20").Copy _
.Workbooks(ブック２名称).Application.Worksheets(シート名).Range("A1")

End With

次ページ

続きを表示

1を表示