Hi Yahya,

Attached is the solution. Use the below code in ThisWorkbook code section.

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

    Dim ws As Worksheet

    For Each ws In ActiveWorkbook.Worksheets
        If ws.Range("C1").Value = "0" Then
            ws.Visible = xlSheetHidden
        End If
    Next

End Sub


Let us know if any further help is required.

Thanks and best regards,
Ayush Jain



On Sun, Feb 7, 2010 at 3:01 PM, Yahya <yahya...@gmail.com> wrote:

> Hi
>
> I have a workbook which has a no of worksheets. I want to hide all those
> worksheets automatically, when the value of a particular cell (Say C1) in
> that worksheet  is zero. Can someone help me with the code for it?
>
>
> Regards
>
> Yahya
>
> --
>
> ----------------------------------------------------------------------------------
> Some important links for excel users:
> 1. Follow us on TWITTER for tips tricks and links :
> http://twitter.com/exceldailytip
> 2. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
> http://www.excelitems.com
> 3. Excel tutorials at http://www.excel-macros.blogspot.com
> 4. Learn VBA Macros at http://www.quickvba.blogspot.com
> 5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
>
>
> To post to this group, send email to excel-macros@googlegroups.com
> If you find any spam message in the group, please send an email to:
> Ayush Jain @ jainayus...@gmail.com
> <><><><><><><><><><><><><><><><><><><><><><>
> HELP US GROW !!
>
> We reach over 6,700 subscribers worldwide and receive many nice notes about
> the learning and support from the group.Let friends and co-workers know they
> can subscribe to group at
> http://groups.google.com/group/excel-macros/subscribe
>

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at 
http://www.excelitems.com
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 

To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain  @ jainayus...@gmail.com
<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!

We reach over 6,700 subscribers worldwide and receive many nice notes about the 
learning and support from the group.Let friends and co-workers know they can 
subscribe to group at http://groups.google.com/group/excel-macros/subscribe

Attachment: Yahya.xlsm
Description: Binary data

Reply via email to