こんにちは。OSはWindowsNT、Excel97です。
PC初心者さんが使うエクセルの見積データを作成しており、より簡単に操作して頂くためにコマンドボタンで操作を簡略化したいと思っています。
そこで質問なのですが、ファイルを閉じようとする時、よく右隅の×ボタンを押し、「保存しますか?はい、いいえ、キャンセル」という画面がでます。私の作っているデータでは上書されると困るので保存をして欲しくないのですが、その辺が使い手の方には分かり難いようで、よく上書されてしまいます。読み取り専用にするとか保護設定するとか方法はあるとは思いますが、データ作成上それが出来ません。出来れば、コマンドボタンで「終了ボタン」を作り、保存せずに終了できるようにしたいのです。こういう事って可能でしょうか?
皆様、宜しくお願いします。
No.5ベストアンサー
- 回答日時:
もう皆さんが既に回答されてますが、最初の質問に対しては、ブックを閉じるだけ(Excelは終了しない)ならば
Sub 保存()
ActiveWorkbook.Close False
End Sub
という書き方もあります。FalseをTrueに替えると、必ずブックを保存して終了します。
また、Excel(アプリケーション)ごと閉じるならば
Sub 保存()
Application.DisplayAlerts = False
Application.Quit
End Sub
でどうでしょうか。
また、フォントのサイズについては、ユーザーフォームを作ってボタンを配置しているのならば、既に回答されている通りですが、もしシートに直接ボタンを貼り付けているのでしたら、ボタン右クリック→テキストの編集という方法もあります。
No.3
- 回答日時:
ボタンを右クリックし、プロパティを表示してください。
そのプロパティにFONTの項目があります。これを選択すると、フォントが変更できるはずです。
No.2
- 回答日時:
はじめまして。
このような感じでいかがでしょう?(コマンドボタン右クリック→「コードの表示」で作成しています)
Private Sub CommandButton1_Click()
Application.DisplayAlerts = False
Application.Caption = Empty
Workbooks.Close
Application.DisplayFullScreen = False
MenuBars(xlWorksheet).Reset
Application.Quit
End Sub
この回答への補足
ありがとうございました。
早速試してみます。
ところで新たに質問なのですが、コマンドボタンのフォントサイズはどうやって変更したら良いのでしょうか?
宜しくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(Microsoft Office) windows10で作業を終了する際の「保存しますか はい いいえ」を表示させずに自動で保存する方法 6 2023/03/15 11:29
- アプリ Edgeを操作するアプリについて 4 2023/05/11 22:48
- docomo(ドコモ) 携帯 arrows we の操作 4 2023/03/29 18:53
- Access(アクセス) アプリケーションエラー 3 2022/10/09 00:27
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Word(ワード) Wordのデータが毎回破損してしまう 1 2022/08/24 11:30
- その他(プログラミング・Web制作) Windowsのマクロプログラムで、こんなことできますか? 3 2022/06/28 14:30
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- ガラケー・PHS ボタン操作の携帯電話を使い続けたいのですが、将来的にボタン操作の携帯電話が販売終了する、通話が出来 9 2023/04/22 14:50
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Excel VBAで「プログラム実行」ボタンと「プログラム停止」ボタンをつけたい
Excel(エクセル)
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
【Excel VBA】マクロでExcel自体を終了させたい
Excel(エクセル)
-
-
4
Excel マクロ 閉じるボタン
Visual Basic(VBA)
-
5
Excelマクロ ボタンをクリックするだけで、保存せずにシートを閉じる
Excel(エクセル)
-
6
ExcelでVBA実行後×(閉じる)ボタンでExcelが終了できなくなる。
Excel(エクセル)
-
7
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
8
テキストボックスの番号を使ったFor~Next文について
Visual Basic(VBA)
-
9
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
-
10
エクセルファイルを開く時、常に同じシートから開くようにするには?
Windows Vista・XP
-
11
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
12
EXCEL VBA 印刷プレビューダイアログのボタン操作を判定したい
Visual Basic(VBA)
-
13
EXCEL VBA セルに既に入力されている文字に文字を追加する
Excel(エクセル)
-
14
ユーザーフォーム スクロールバー 非表示にしたい
Excel(エクセル)
-
15
エクセルVBA オプションボタンのチェックを外したい
Excel(エクセル)
-
16
エクセルのマクロを一定時間ごとに実行
Excel(エクセル)
-
17
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
18
エクセルを閉じる時に保存メッセージを表示させずに保存しないで閉じるには
Excel(エクセル)
-
19
VBA 数式を残して値をクリアについて
Excel(エクセル)
-
20
EXCEL VBA コンボボックス、テキストボックスが未入力のときメッセージを表示する方法
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
コマンドボタンを押すたびに大...
-
スクロールしてもボタンを常に...
-
Accessのコマンドボタンの立体...
-
エクセルVBA シート上にあるコ...
-
ShowAllDataのエラーを回避したい
-
Excel:コマンドボタンの移動
-
エクセルVBA
-
押したボタンの位置取得(共通の...
-
コマンドボタンがあるかどうか...
-
EXCELでNo.を変えて印刷したい
-
Excel VBA --- コマンドボタ...
-
Accessユーザーフォームでコマ...
-
エクセルVBAでOptionButtonのオ...
-
Excelのマクロでコマンドボタン...
-
エクセルのマクロでスライドシ...
-
ROCKET MOUSEの使い方
-
VisualStudioCodeで、Excelのク...
-
チェックボックスで「いずれか1...
-
Wordでドラッグした文字列を括...
-
PPTのコマンドボタンがクリック...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excel:コマンドボタンの移動
-
コマンドボタンを押すたびに大...
-
スクロールしてもボタンを常に...
-
押したボタンの位置取得(共通の...
-
エクセルVBAでOptionButtonのオ...
-
ShowAllDataのエラーを回避したい
-
エクセルVBA シート上にあるコ...
-
コマンドボタンがあるかどうか...
-
PPTのコマンドボタンがクリック...
-
Excel VBA --- コマンドボタ...
-
エクセルVBA
-
Accessのコマンドボタンの立体...
-
エクセルのコマンドボタンの位...
-
実行中の作業を中止させるコマンド
-
EXCELでNo.を変えて印刷したい
-
コマンドボタンで「終了ボタン...
-
マクロ登録ボタンに色をつける
-
Accessユーザーフォームでコマ...
-
[ExcelVBA] コマンドボタンを押...
-
コマンドボタンがきかなくなる
おすすめ情報