Macro to hide/unhide WS based upon WS tab color

J

Joe M.

I have this macro to hide all WS that have red tabs. But it dosn't work. It
only hides one tab when there are many that are red. What is wrong?

Sub Hide_shts()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If ws.Tab.Color = 255 Then
ws.Visible = False
End If
Next
End Sub

Thanks,

Joe M.
 
×

מיכ×ל (מיקי) ×בידן

To my opinion it should work.
Try, maybe:
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top