<div>
fantastic.<br />
except...<br />
it is case sensitive!<br />
and...<br />
if for some reason there are two sheets that have a tab name begining with &quot;work&quot; there is an error..<br />
how to pose this question?<br />
hmm...
</div>


fantastic.
except...
it is case sensitive!
and...
if for some reason there are two sheets that have a tab name begining with "work" there is an error..
how to pose this question?
hmm...

<div>
I can't see why having more than one sheet with the name beginning with 'work' would cause an error but what error is it causing?<br />
<br />
As for the case thing, try this.<br />

<pre><code id="code-20-40599910-1">Dim ws As Worksheet
 
    For Each ws In ActiveWorkbook.Sheets
        If LCase(ws.Name) LIke &quot;work*&quot; Then
            ws.Visible = False
       End If
   Next ws</code></pre>
</div>


I can't see why having more than one sheet with the name beginning with 'work' would cause an error but what error is it causing?

As for the case thing, try this.


Dim ws As Worksheet
 
    For Each ws In ActiveWorkbook.Sheets
        If LCase(ws.Name) LIke "work*" Then
            ws.Visible = False
       End If
   Next ws

<div>
You are correct on both counts! &nbsp;<br />
I must have mistyped something . &nbsp;<br />
LCase works fine<br />
Thanks
</div>


You are correct on both counts!  
I must have mistyped something .  
LCase works fine
Thanks

<div>
<div class="content wysiwyg-content">
I want to check if a workbook contains a tab with the name work* IE: workarea or &quot;work sheet&quot;<br />
and hide the sheets that are so named
</div>
</div>


I want to check if a workbook contains a tab with the name work* IE: workarea or "work sheet"
and hide the sheets that are so named

Check Excel worksheet tab name for text and hide the sheet

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