Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8506 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【32861】ポップアップ画面を無視したいのですが・・ KIMU 05/12/25(日) 15:53 質問[未読]
【32862】Re:ポップアップ画面を無視したいのですが... MARBIN 05/12/25(日) 15:59 回答[未読]
【32864】Re:シート削除の際の警告メッセージを表示... かみちゃん 05/12/25(日) 16:00 回答[未読]
【32865】Re:シート削除の際の警告メッセージを表示... KIMU 05/12/25(日) 16:19 お礼[未読]
【32861】ポップアップ画面を無視したいのですが・...
質問  KIMU  - 05/12/25(日) 15:53 -
引用なし
パスワード
   VBA初心者です。
よろしくお願いします！

VBAにて自動でシートを削除したいのですが、
処理中に確認メッセージがポップアップで
表示されてしまいます・・。

このポップアップを無視（okボタン自動押下）
させるにはどのようにすればよいのでしょうか？

よろしくお願いします！
【32862】Re:ポップアップ画面を無視したいのです...
回答  MARBIN  - 05/12/25(日) 15:59 -
引用なし
パスワード
   ↓のようにしてみてください。

Application.DisplayAlerts = False
'処理
Application.DisplayAlerts = True
【32864】Re:シート削除の際の警告メッセージを表...
回答  かみちゃん  - 05/12/25(日) 16:00 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>VBAにて自動でシートを削除したいのですが、
>処理中に確認メッセージがポップアップで
>表示されてしまいます・・。

DisplayAlerts プロパティをヘルプで調べてみてください。
次のような使い方をします。

Sub test()
　Application.DisplayAlerts = False
　'〜シート削除処理〜
　Application.DisplayAlerts = True
End Sub
【32865】Re:シート削除の際の警告メッセージを表...
お礼  KIMU  - 05/12/25(日) 16:19 -
引用なし
パスワード
   MARBINさま
かみちゃんさま

できました〜☆
ありがとうございます！

とても助かりました♪
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
8506 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free