シートをコピーして新しいブックに張り付けるコードは以下の通りです。
機能.シート.S_コピーを新規ブックに作成(コピーするシート As Worksheet, Optional コピーされたシートの名前 = “”) As Workbook
このコードには二つの引数が必要になります。
１，コピーするシート As Worksheet
コピーしたいシートを指定します。
２，コピーされたシートの名前 = “”
新しいブックにコピーしたシートの名前を指定します。
省略が可能です（省略した場合、もともとのシート名のままになります）。
例えば「請求書」ブックの「顧客」シートを、新しいブックにコピーしたい場合は以下のように書きます。
Dim 新規ブック As Workbook
Set 新規ブック = 機能.シート.S_コピーを新規ブックに作成(Worksheets(“顧客”), “顧客マスター”)
「顧客」というシート名をそのままでいい場合は、
Dim 新規ブック As Workbook
Set 新規ブック = 機能.シート.S_コピーを新規ブックに作成(Worksheets(“顧客”))
と書きましょう。
