2012-03-23 31 views
1

Windows 7 ProfessionalのセットアップでExcel 2003を使用します。 私のPersonal.xlsファイルでは、Excelを使用する際に準備ができているように、別の場所から取得したコード/数式のスニペットをコンパイルしました。これらには、cell()rand()today()などのような多数の揮発性関数が含まれています。その結果、Excelを閉じると、Personal.xlsを保存するかどうか尋ねられます。Personal.xlsを自動的に保存する

私は自分のPersonal.xlsをそのまま保ちたいと思いますが、ポップアップを何とか無効にしたいと思います。私はPersonal.xlsを変更しないので、どちらの方法でも保存せずに保存しても問題ありません。

私はWorkbook_BeforeCloseセクション

Private Sub Workbook_BeforeClose(Cancel As Boolean) 
ThisWorkbook.Save 
End Sub 

で私のPERSONAL.XLSに次のコードを試してみました。しかし、動作するようには思えません。私は.Save.Saved=Trueを含むいくつかのバリエーションを試しましたが、代わりにThisWorkbook.,Me. & Workbooks("PERSONAL.xls")を代わりに使用しようとしました。しかしExcelは依然として私にPersonal.xlsの保存を依頼します

私はPersonal.xlsの計算を無効にしようとしました。

Private Sub Workbook_Open() 
For Each ws In ThisWorkbook.Worksheets 
ws.EnableCalculation = False 
Next 
End Sub 

これは問題を解決しません。最後に、計算モードを手動に変更した後に 'ThisWorkbook.Save'を実行しようとしましたが、それでも何も変わりません。

ここに何か不足していますか?アドバイスをいただければ幸いです。前もって感謝します!

答えて

0

あなたが欲しい:ワークブックBeforeCloseイベントで

Me.Save 

+0

として取り消しを削除私はすでに 'Me.Save'と' Me.Saved = true'を、@jesseの両方を試してみました。しかし、それは何の効果もないようです。私は何か他のものを逃すことができますか? – playercharlie

+0

@playercharlieどのようにこれを正解としてマークしましたが、それはうまくいかないとコメントしていますか? –

0

これがあなたに役立つかどうかはわかりませんが、私は実行しようとしていますが、私は保存できます。投票しないで投票してください。

私はちょうどブール

Private Sub Workbook_BeforeClose() 
ThisWorkbook.Save 
End Sub 
+0

試しましたが、何も変わりません。 :) – playercharlie

関連する問題