I have a workbook with 500 tabs. 200 of the tabs are named: FI (1), FI (2),
FI (3), etc. I want to delete all tabs that start with FI.

I've tried the below without success - any suggestions? Here's what I have:

Dim ws As Worksheet
Application.DisplayAlerts = False
For Each ws In Worksheets
If ws.Name = "FI (*)" Then ws.Delete
Next
Application.DisplayAlerts = True