以前紹介した各シートを一つのシートにまとめるとは逆に
今度は、それぞれのシートに別れているものを
各ブック（エクセルファイル）として分ける方法です。
各ブックに分けることで必要なファイルの検索が容易になり
使い方が広がります。
方法ですが、今回はソフトではありません。
①まずエクセルの上のメニュー表示から右のマクロの表示を選択
②次に適当なaaなどのファイル名を入力（シートをわけると入力したがなんでもよい）
作成をクリック
③でてきたコードをすべて削除して下のコードをコピペ
sub macro1()
dim s as worksheet
for each s in worksheets
s.copy
activeworkbook.saveas s.name
activeworkbook.close false
next
end sub
④右上のボタンで閉じる
⑤再度①のマクロを表示
名前がmacro1となっているが、そのまま実行をクリック
⑥windowsのドキュメントフォルダに各ブック（エクセルファイル）として
保存されている。
という手順になります。
マクロなんかわからなくても簡単でしょ。
コメント