- ベストアンサー
excel2000の終了
下記のVBAで Workbooks("book1.XLS").Close SaveChanges:=False Application.Quitを書いていますが、 book1.xlsは保存しないで閉じた後にEXCELを終了させる 方法を教えてください。
- オフィス系ソフト
- 回答数2
- ありがとう数1
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
こんにちは。 ＞Workbooks("book1.XLS").Close SaveChanges:=False ＞Application.Quitを書いていますが、 ＞book1.xlsは保存しないで閉じた後にEXCELを終了させる "Book1.xls"は、コードが書かれているブックですか？ であれば順序が逆です。 ------------------------------------------------ Application.Quit ThisWorkbook.Close SaveChanges:=False ●コードの書かれているブックを扱う時は、 Workbooks("Book1.xls") とブック名を使うより ThisWorkbook が一般的です。 ------------------------------------------------- 以上です。
その他の回答 (1)
- komet163
- ベストアンサー率51% (22/43)
こんにちは。 #1 の方と同様にブックにコードがかかれているとして、 ThisWorkbook.Saved = True Application.Quit と記述してはいかがでしょう。
関連するQ&A
- エクセルを終了
お世話になります。 エクセルＶＢＡでエクセルを終了する時、下記の様な 記述をしていますが、そのファイルしか終了出来ません。 エクセルのアプリケーション自体を終了したいのですが、 その記述方法をご教授頂けないでしょうか。 宜しくお願い致します。 記 Workbooks("---.xls").Close savechanges:=False
- ベストアンサー
- Microsoft ASP
- エクセルの終了
お世話になります。 ＶＢＡでエクセルを終了する時、下記の様な記述をして 終了するのですが、エクセルのブラウザは残ります。 エクセル毎終了する記述方法についてご教授頂きたく 何卒、宜しくお願い申し上げます。 記 Workbooks("---.xls").Close savechanges:=False
- ベストアンサー
- Visual Basic
- EXCEL2007でワークブックのクローズ処理
教えてください。 EXCEL2003形式ファイルのVBAに、 Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Close SaveChanges:=False End Sub を記述してファイルを保存します。(作成は、EXCEL2003で保存します。) (仮にBook1.xlsとします。) このファイル(Book1.xls)をEXCEL2007で開きます。 このとき、別のファイル(仮にBook2.xlsとします。形式は、EXCEL2003です)をEXCEL2007で開きます。 で、Book1.xlsを×ボタンで終了すると、 EXCEL2007が異常終了します。 環境依存でしょうか？ PCの環境に、EXCEL2003とEXCEL2007が混在しています。
- 締切済み
- オフィス系ソフト
- エクセル・エラーを出さずに複数ブックをクローズしたい
複数のファイルを閉じたいのですが、 Sub 必要ファイルを閉じる() Workbooks("あ.xls").Close SaveChanges:=False Workbooks("い.xls").Close SaveChanges:=False Workbooks("う.xls").Close SaveChanges:=False Workbooks("え.xls").Close SaveChanges:=False End Sub 開いていないファイルがあるとエラーで止まってしまいます。 この4つのファイルに該当するものがあれば、閉じる というマクロを組みたいです。 アドバイス、宜しくお願いします。
- ベストアンサー
- オフィス系ソフト
- Excel VBAで別のブックからユーザーフォームの閉じる
Excel VBAで別のブックからユーザーフォームの閉じたいのですが うまくいきません。 教えてください。 Private Sub CommandButton2_Click() Application.Visible = False Unload Workbook.("材料リスクマップ検索Ver2.xls")UserForm3・・・・※ Workbooks.Close userform3:=ThisWorkbook.Path & "あああ.xls" Workbooks("\いいい.xls").Close savechanges:=False UserForm1.Show vbModeless End Sub ※印のところが赤字にかわります。 コマンドボタン２は、いいい.xlsにあり、フォームを閉じたいのはあああ.xlsのUserform3です。 その後、ファイル名いいい.xlsは閉じます。 コードが間違っているかと思いますが、どんな風にすればよいかわかりません。初歩的なこととは思いますがよろしくお願い致します。
- ベストアンサー
- その他（プログラミング・開発）
- VBAでファイルを保存せずに閉じた後の他ブックの挙動
初めて質問させていただきます。 VBA初心者の為、質問自体に不足があるかもしれませんが、ご協力をお願い致します。 エクセル2000(SP3)で複数のブック（仮にA.xls,B.xlsとします）を起動した状態で、Aをマクロを使って保存せずに終了させたところ、Bの操作が出来なくなります。（セル選択等もできません。Bのsheetを選択するとアプリケーションエラーになってしまいます） 同Windows上に他アプリケーションが起動している場合、それらを一度選択してから再度Excelを選択すると、Bの操作が可能になります。 保存せずに終了させる為のマクロは次のとおりです。 ブックAのThisWorkbook内に記述しています。 Private Sub Workbook_BeforeClose(Cancel As Boolean) If Workbooks.count = 1 Then Application.DisplayAlerts = False Application.Quit Else ThisWorkbook.Close SaveChanges:=False End If End Sub 以上、よろしくお願い致します。
- ベストアンサー
- Visual Basic
- 【Excel VBA】マクロでExcel自体を終了させたい
環境：WindowsXP、Excel2003 マクロでエクセルを終了（ブックを閉じて、アプリケーション自体も終了）させたいのですが、以下のコードではアプリケーションが閉じてくれません。 ThisWorkbook.Close ExcObj.Quit Application.Quit どこか悪いところはありますでしょうか？ よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- ＶＢＡ＝一定時間エクセルの入力操作がない場合、自動的にそのブックを閉じたい
共通でエクセルを使用していますが、時々エクセルを開いたまま外出したり、休憩したり する方がおり、別な方がエクセルを開いて作業をしたいと思っても、どこかで開きぱなしのことが時々あります。 そんな時のために、エクセルに何も入力等がない一定時間経過したら、自動で保存して閉じる機能を持たせたいと考えています。例えば入力が５分以上なければ自動的に閉じるように・・・・ 上書き保存は下記のＶＢＡで機能するのは確認済みですが、これに「５分後」等のタイムの設定をしたいのですが可能でしょうか？ 可能の場合、どのようなＶＢＡになりますか？？ よろしくお願いします。 ⇒ 'ブックの上書き保存 ActiveWorkbook.Save ' 保存確認を避けるため、保存済みにする ThisWorkbook.Saved = True ' 他にブックが開いていなければ、Excelを終了する If Workbooks.Count <= 1 Then Application.Quit ' 本ブックをClose ThisWorkbook.Close False
- ベストアンサー
- Windows XP
- EXCELを自動的に終了したい
ＶＢＡマクロで処理をして、終了後に開いたブックを自動的に終了させるため、 Application.Quit を使用しましたが、 他に開いていたブックも終了してしまいます。 ActiveWorkbook.Close に変更すると、 他にブックを開いていない場合、自動的にブックは終了しますが、ＥＸＣＥＬが終了しません。 該当のブックだけを終了することは、できないでしょうか？
- ベストアンサー
- オフィス系ソフト
- エクセル マクロで自動実行と終了について
エクセルで作ったマクロを自動実行・自動保存・自動終了したいので、下記のような 記述のマクロをつくり、Windowsのタスク処理で1回/日実行させようとしています。 ----<ここから>------------------------------------ Sub Auto_Open() : : Workbooks("ekuseru.xls").Close SaveChanges:=True End Sub ----<ここまで>------------------------------------ 質問その１ マクロを編集したい場合はどうすればいいのでしょう？ そのBookを開くとマクロが動き出し、保存した上で終了してしまいます。 マクロ無効でBookを開くと「ツール」⇒「マクロ」⇒「マクロ」で「編集」はクリッ クできないようになってます。 質問その２ マクロが終了するとき、Bookは閉じますがエクセル自体は閉じません。 （意味通じますか？） エクセル自体を閉じるにはマクロの記述はどうすればいいのでしょう？ 以上、よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
