エクセル マクロについて、 Inputボックスでコード（数字4桁）を入力した後、そのコードと同じ値（

エクセル マクロについて、
Inputボックスでコード（数字4桁）を入力した後、そのコードと同じ値（名前）のシート（同ファイル内にあります）を削除したいのですが、VBAはどのように書けばよろしいでしょうか。。

No.1 ベストアンサー 回答者： tom04 回答日時： 2017/08/23 22:06

こんばんは！

一例です。

Sub Sample1()
Dim sN As String
sN = InputBox("シート名（4桁数値）を入力")
On Error Resume Next '//←念のため★//
Application.DisplayAlerts = False
Worksheets(sN).Delete
Application.DisplayAlerts = True
End Sub

※　本来は細かいエラー処理が必要なのでしょうが、
★の行で簡単にエラー処理をしているため
シートなくても何も変化がありません。m(_ _)m