Deleting a worksheet based on a drop down list value

[Panahasi]

I have a spreadsheet set up with thousands of worksheets, however I do not need them all depending on the value of a drop down list.

Any ideas how I can do this?

 

[Panahasi]

I have found this code.

Sub delSheets()
Dim wks As Worksheet

Application.DisplayAlerts = False
For Each wks In ActiveWorkbook.Worksheets
If wks.Range("V3") = "invalid location or speed" Then
wks.delete
End If
Next
Application.DisplayAlerts = True
End Sub