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

作業ブック内の作業シートを編集してマクロを実行すると
注意文のメッセージボックスが表示されえて、保存(S)をクリックで保存しておりますが、
シートを編集しても、メッセージボックスが表示されないでそのまま保存出来る方法を教えてください。
マクロ
Sub 上書保存()
Dim ブック As Workbook
For Each ブック In Workbooks
ブック.Save
Next
Application.Quit
End Sub
です。
よろしくお願いいたします。

A 回答 (2件)

セーブの前に、


Application.DisplayAlerts = False
を挿入してみよう。
    • good
    • 0
この回答へのお礼

回答ありがとうございます。
上手くできました。

お礼日時:2023/06/09 12:31

今回の件は以前の


https://oshiete.goo.ne.jp/qa/13488577.html
において、

Sub 電子提出()
Dim myFull As String

myFull = ThisWorkbook.FullName
Application.DisplayAlerts = False ' ★ここの部分
' ~以下略~

既に使用されているのですが、仮に回答で得て理解できない箇所は調べるなりキチンとその時に聞いておく事をお勧めします。
    • good
    • 0
この回答へのお礼

ありがとうございました♪

お礼日時:2023/06/09 17:49

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