Excelでファイルをコピーするボタンを作成しますか？

ボタンをクリックすると、現在開いているExcelファイルを保存してC：\ tempにコピーするボタンをExcel 2010で作成します。Excelでファイルをコピーするボタンを作成しますか？

これは可能ですか？おそらく、マクロがexeプログラムを起動するか、マクロ内ですべて実行できるのでしょうか？あなたのボタンのClickイベントで

2011-09-27 TruMan1

With ActiveWorkbook 
    .Save 
    .SaveCopyAs "C:\Temp\Copy.xls" 
End With

2011-09-27 16:55:10

、あなたは別のブックに現在のワークシートをコピーし、Cでそれを保存することができます：\ Tempに...ような何か：

Sheets(Array("Sheet1", "Sheet2", "Another Sheet")).Copy 
ActiveWorkbook.SaveAs "C:\Temp\Copy.xls" 
ActiveWorkbook.Close

2011-09-27 15:24:34 Xophmeister

シートの数十、よりがあります。が加えられる。加えて、私が保持したいマクロがあります。ファイル全体（evalシェルコマンド）をコピーする方法はありますか？ – TruMan1

'FileCopy'はファイルをコピーするだけです（ソースと目的地のパラメータを提供します）。これを使って何かをコピーすることができますが、問題は、ワークブック自体がコピーしようとしているので、それ自体は明らかに開いてロックされているのでエラーになります。 – Xophmeister

答えて