VBA 複数シートをコピーして別ブックへ保存 複数シートをコピーして別ブックへ保存する Sub Test() ' 複数シートを新しいブックへコピー ThisWorkbook.Worksheets(Array("4月", "5月")).Copy ' 新しく作成したブックを名前を付けて保存 ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\新在庫管理表.xlsx" ' 新しく作成したブックを閉じる ActiveWorkbook.Close True End Sub ― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 参考記事 『VBA シートをPDF保存』 シートをPDF保存 Sub MyPdf() ’ アクティブシートをPDF化 Dim MyName As String Dim WS As …ameblo.jp 『VBA ブックを閉じる(Closeメソッド)』 変更を保存せず閉じる Sub test() ’ 変更を保存せず閉じる ActiveWorkbook.Close ’ActiveWorkbo…ameblo.jp 『VBA ワークシートをグループ化する』 Array関数によるシートグループ化 Sub test() ’Sheet1とSheet3グループ化する(同時選択状態) Sheets(A…ameblo.jp 『VBA シート移動・コピー』 シートの移動 構文 Worksheets.Move(Before, After) Sub test1() ’Sheet2をSheet3の後ろ…ameblo.jp
『VBA ブックを閉じる(Closeメソッド)』 変更を保存せず閉じる Sub test() ’ 変更を保存せず閉じる ActiveWorkbook.Close ’ActiveWorkbo…ameblo.jp