エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
Office TANAKA - Excel VBA Tips[シートを別ブックとして保存する]
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
Office TANAKA - Excel VBA Tips[シートを別ブックとして保存する]
実務では、特定のシートだけを別ブックとして保存することが多いです。たとえば、Sheet1とSheet2があっ... 実務では、特定のシートだけを別ブックとして保存することが多いです。たとえば、Sheet1とSheet2があったとして。このSheet2の名前を"田中"に変え、"田中"シートだけを「田中.xlsx」として保存する。みたいな。 このとき、ほとんどの方が次のように考えます。 まずSheet2の名前を"田中"に変える 新しいブックを挿入する [田中]シートを、挿入した新しいブックにコピーする 新しいブックで、"田中"以外のシートを削除する 挿入したブックを"田中.xlsx"で保存する この考え方でマクロを作ってみましょう。こうなります。 Sub Sample1() Dim ws As Worksheet Sheets("Sheet2").Name = "田中" ''1. Workbooks.Add ''2. ThisWorkbook.Sheets("田中").Copy After:=ActiveW