| |
▼ネコ さん：
こんばんは。
>皆さんに教えていただいたコードも試してみたのですけれども、
>シートのセルに対しての変更では出なくなったのですが、
>セルに置いてあるTextBoxに変更をかけると、確認メッセージが
>出てしまいます。
>バージョンの問題なのでしょうか？
>
>WindowsXP
>EXCEL2000
前回の私の投稿は
Win98&Excel2000（SP-3）
Win98&Excel2000(SR-1)
で確認しました。
再度の確認をお願いできますか？
何の確認かと言うと現在のところ私とネコ さんの環境の違いは
Windowsの違いに見えますが、これが本当にこれだけの違いかの確認です。
私が確認した手順は、
１． 新規ブックの任意のシートに
「コントロールツールボックス」のテキストボックス（Textbox1）を貼付けます。
２. Thisworkbookのモジュールに前回投稿のコード
'============================================
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Quit
ThisWorkbook.Saved = True
End Sub
を記述します。
３. 適当な名前で一度保存して、一度Excelを閉じます。
４． 再度、当該ブックを開いてテキストボックスに何か入力します。
５． ここでExcelを閉じるｘボタン（外側のボタン）をクリックする。
この手順で実行した場合、ネコ さんの希望どおり、何のメッセージも表示されずに
Excelが終了します。
尚、上記の手順中、当該ブック以外の開いているブックはありません。
これで再度試してみて下さい。
手順が同じで動作が違うなら、Windowsの違いが影響している事も
当然考えられますよね！！
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
- 05/9/22(木) 19:17 -
