<div>
I think if you Dim i as Integer?
</div>


<div>
Unless you need to know the sheet number, it would be better to loop over the worksheets collection.<br />
<br />
<br />

<pre><code id="code-8205320">dim ws as worksheet
for each ws in worksheets
    if ws.name = &quot;ACV&quot; then
        ...
    end if
next ws</code></pre>
</div>


Unless you need to know the sheet number, it would be better to loop over the worksheets collection.




dim ws as worksheet
for each ws in worksheets
    if ws.name = "ACV" then
        ...
    end if
next ws

<div>
I could swear I tried exactly what you posted, but obviously not exactly :-) &nbsp;Thanks, SantaBaby.<br />
<br />
- John
</div>


I could swear I tried exactly what you posted, but obviously not exactly :-)  Thanks, SantaBaby.

- John

<div>
<div class="content wysiwyg-content">
I get a type mismatch error on line 3 in the code below. What is the proper way to write that line?<br />
<br />
Thanks,<br />
John<br />

<pre><code id="code-8205311">Sub RemoveSheets()
Dim i As Long, ws As Worksheet
For i = 1 To ActiveWorkbook.Worksheets.Count
    If Worksheets(i).Name = &quot;ACV&quot; Or &quot;B773i4&quot; Or &quot;JETZ&quot; Or &quot;LEGACY&quot; Then
    Worksheets(i).Visible = True
    Worksheets(i).Delete
    End If
Next
End Sub</code></pre>
</div>
</div>


I get a type mismatch error on line 3 in the code below. What is the proper way to write that line?

Thanks,
John

Unhiding and deleting multiple sheets based on their names

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.