- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：エクセルVBA、MsgBOXで入力した2つのシート番号で挟まれたシートをすべて消去したい。）
エクセルVBAで複数シートを一括で消去する方法
このQ&Aのポイント
- エクセルVBAのMsgBoxを使用して2つのシート番号で挟まれたシートを一括で消去する方法を教えてください。
- 現在、複数のシートを指定してDeleteを行うと、シート名を個別に指定する必要があります。しかし、MsgBoxで入力した2つの数字を使用して一括で消す方法があれば教えてください。
- また、現在の方法ではシートを一枚ずつ消すごとに確認ダイアログが表示され、作業が面倒です。一括で消す方法があれば教えてください。
- poo777papa
- お礼率100% (4/4)
- オフィス系ソフト
- 回答数1
- ありがとう数1
- みんなの回答 （1）
- 専門家の回答
質問者が選んだベストアンサー
＞「データがあります。消してよいですか？」のメッセージが出てきて、作業が面倒です。 ここだけなら、 Sub try() Application.DisplayAlerts = False Sheets(1).Delete Application.DisplayAlerts = True End Sub と言う感じにすればメッセージはでないです。
お礼
見事に解決しました。 一括する方法で悩んでいましたが、 なるほど、スムーズに処理できるようになりました。 ありがとうございました。