- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：エクセルのシート１枚だけ保存するマクロ）
エクセルのシート１枚だけ保存する方法とは？
このQ&Aのポイント
- エクセルのシート１枚だけを別ファイルに保存する方法を教えてください。
- シート１にはイメージコントロールが３個あり、画像も入れ替わりますが、式は入っていません。
- ファイル名は帳票の個別名称を使用しますので重複はしません。
- kopepe
- お礼率100% (14/14)
- Visual Basic
- 回答数2
- ありがとう数3
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
マクロの記録でできるでしょう。ほかに考慮することは、名前やフォルダは前もってInputBoxで聞けばよい。 操作 保存したいシートのタブ部で右クリック 移動またはコピー コピーを作成するにチェックを入れる 移動先ブック名 新しいブック OK 保存しますか はい 「名前をつけて保存」のウィンドウが出る ブックの名前を入力 保存をクリック ーーー コードは Sub Macro1() Sheets("Sheet1").Select Sheets("Sheet1").Copy ActiveWorkbook.SaveAs Filename:= _ "C:\Documents and Settings\xxxx\My Documents\Bookxx.xls", FileFormat:=xlNormal _ , Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _ CreateBackup:=False ActiveWindow.Close End Sub
その他の回答 (1)
- nekotaru
- ベストアンサー率50% (22/44)
回答No.1
いつもお世話になります。 教えてください。 機能を実現したいマクロは、そのシート１だけを保存したBOOKに作っていいのでしょうか？
質問者
お礼
ありがとうございました。 買い物に行っている間に２の方の回答で解決がつきました。 ときどき質問していますので、またそんな時はよろしくお願いいたします。
お礼
ありがとうございました。 記載していただいたコードのファイル名を、サブの引数で指定して連続保存も可能になりました。 ６０００枚ほど作成する必要があったので、大変助かりました。 またこんな機会がありましたら、その時もよろしくお願いいたします。