macro excel delete sheet if part of name is

[tuytuy]

Hi,
i wanted to ask a macro to delete the a worksheet in a workbook, but only if it starts by "RoughData_139190_".
Here is what i thought would work :

' Delete orignial sheet


Application.DisplayAlerts = False
Worksheets("RoughData_139190_*").Delete
Application.DisplayAlerts = True

 

[VoG]

Try

Dim ws As Worksheet
Application.DisplayAlerts = False
For Each ws In ActiveWorkbook.Worksheets
    If ws.Name Like "RoughData_139190_*" Then ws.Delete
Next ws
Application.DisplayAlerts = True

 

[tuytuy]

works thank you so much.