C# と VB.NET の質問掲示板

ASP.NET、C++/CLI、Java 何でもどうぞ

C# と VB.NET の入門サイト

シートのコピー方法を教えてください

[トピック内 3 記事 (1 - 3 表示)]  << 0 >>

■103676 / inTopicNo.1)  シートのコピー方法を教えてください
  
□投稿者/ さなだむし (1回)-(2025/05/15(Thu) 16:04:44)

分類:[.NET 全般] 

dim wbsource as workbook 'コピー元ブック
dim wssource as worksheet 'コピー元シート
dim wbdest as workbook 'コピー先ブック
dim wsdest as worksheet 'コピー先シート

wssource のシートをwsdest のシートにコピーしたいのですが
ネットで「シート コピー」で調べると、シートを追加する方法しか見つかりません。
以下のようにコピーした後で消すしかないのでしょうか?
Set wbdest = Workbooks.Add
wssource.Copy After:=wbdest.worksheets(1)
wbmake.Worksheets(1).delete

ブックを作成したときにできるSheet1に直接コピーする方法を教えてください。


引用返信 編集キー/
■103677 / inTopicNo.2)  Re[1]: シートのコピー方法を教えてください
□投稿者/ KOZ (484回)-(2025/05/15(Thu) 17:47:56)
No103676 (さなだむし さん) に返信
> ブックを作成したときにできるSheet1に直接コピーする方法を教えてください。

Copy メソッドの引数を省略すると、新しいブックが作成され、新しいブックは
Application.ActiveWorkbook になります。

wssource.Copy
Set wbdest = Application.ActiveWorkbook
Set wsdest = wbdest.Worksheets(1)

引用返信 編集キー/
■103678 / inTopicNo.3)  Re[2]: シートのコピー方法を教えてください
□投稿者/ さなだむし (2回)-(2025/05/16(Fri) 08:31:03)
No103677 (KOZ さん) に返信
コピーできました。
ありがとうございました。

解決済み
引用返信 編集キー/

このトピックをツリーで一括表示


トピック内ページ移動 / << 0 >>

このトピックに書きこむ