アプリ版:「スタンプのみでお礼する」機能のリリースについて

お世話になります。

(Excel2000)
非表示にしておいた数式バーとステータスバーを、作成した
VBAのアプリが終了する際に、表示にしてから終了させて
いるつもりなのですが、次にExcelを開いたときにも、表示
されません。

もちろん、手動でオプションからチェックボックスにチェックを
入れて表示させることは出来るのですが、アプリが終了する際に、
表示に切り替えてから終了…という流れができません。

この対策方法を教えて下さい。

尚、処理で行っていることは、下記の流れになります。

Application.DisplayFormulaBar = True
Application.DisplayStatusBar = True
Application.Quit

以上、よろしくお願いいたします。

A 回答 (1件)

>Application.DisplayFormulaBar = True


>Application.DisplayStatusBar = True
>Application.Quit

このコードはどこに書いてありますか?
また、ブックはコードでCloseしているのか、手動で閉じる(×)ボタンからでしょうか。

そこら辺りが問題になりますの補足説明は必要です。
またそこらのコードを端折らずにアップしましょう。
 

因みに下記のようにすればOKです。

'----- 標準モジュール ------------

Sub BookClose()
 Application.DisplayFormulaBar = True
 Application.DisplayStatusBar = True
 Application.Quit
 ThisWorkbook.Close True
End Sub

'------ ThisWorkBook モジュール ------

Private Sub Workbook_BeforeClose(Cancel As Boolean)
 Application.DisplayFormulaBar = True
 Application.DisplayStatusBar = True
End Sub

'--------------------------------------------

上記は数式バー、ステータスバー回復のみです。
 
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!