[[20171216173825]]　『シートのコピーと削除をした時のメッセージを非表』（りりあん）　ページの最後に飛ぶ

『シートのコピーと削除をした時のメッセージを非表示させたい』（りりあん）

?@メモシートを削除するマクロを設定しました。
削除する際に確認のメッセージが表示されないようにするには
どうすればよいでしょうか?

メモシート削除

　　Sheets("メモ").Select

    Application.CutCopyMode = False
    ActiveWindow.SelectedSheets.Delete
    Application.DisplayAlerts = False

?A対象シートをコピーするマクロを設定しました。
名前の定義が設定されているようでして確認のメッセージが
表示されるため「はい」を何回もクリックしないと先に
進まないためメッセージが表示されないようにするには
どうすればよいでしょうか?

対象シートコピー

    Sheets("対象").Select
    Application.CutCopyMode = False
    Sheets("対象").Copy Before:=Sheets(3)

ご指導よろしくお願いします。

＜使用 Excel：Excel2013、使用 OS：Windows8 ＞

     ActiveWindow.SelectedSheets.Delete
     Application.DisplayAlerts = False
 これは、削除処理をしてから、表示の抑制をしていますね。
 削除処理の前に、表示を抑制し、削除したあとで元に戻すんじゃないですか？
 つまり、
     Application.DisplayAlerts = False
     ActiveWindow.SelectedSheets.Delete
     Application.DisplayAlerts = True

 後半の話も、上の話と同じようにしてみては？

（γ） 2017/12/16(土) 20:33

コメント返信：

[ 一覧(最新更新順) ]

[[20171216173825]] 『シートのコピーと削除をした時のメッセージを非表』（りりあん） ページの最後に飛ぶ

[[20171216173825]]　『シートのコピーと削除をした時のメッセージを非表』（りりあん）　ページの最後に飛ぶ