Take that sheet out of the code in the summary sheet.

Or maybe this is what you want

Application.ScreenUpdating = False

With Sheets("Statistics")

.Visible = Not .Visible
End With

With Sheets("Direct Cost Savings Breakdown")

.Visible = Not .Visible
End With

With Sheets("Pay Inflation - Biometrics")

If .Visible < xlSheetVisible Then

.Visible = Not .Visible
End If
End With

With Sheets("OT Reduction")

.Visible = Not .Visible
End With

--

HTH

Bob

"Larry Fitch" wrote in message
...
Hi Bob -

You are correct in regards to the toggle concept..

What I am trying to figure out is how to prevent a sheet that has been
opened individually from being closed when a button assigned to a summary
of
sheets that contain the same thing is selected..
--
Thanks

Larry


"Bob Phillips" wrote:

Your whole code is a toggle concept, hide it if visible and vice versa.
If
you change it to just making it visible if not visible, it will never get
hidden. So I am confused as to your overall objective.

--

HTH

Bob

"Larry Fitch" wrote in message
...
I have created macros assigned to buttons that open and close individual
sheets. Here is an example -

Sheets("Pay Inflation - Biometrics").Visible = Not Sheets("Pay
Inflation -
Biometrics").Visible

I have also created macros that are assigned to buttons that open an
close
groups of sheets.
Here is an example -

Application.ScreenUpdating = False
Sheets("Statistics").Visible = Not Sheets("Statistics").Visible
Sheets("Direct Cost Savings Breakdown").Visible = Not Sheets("Direct
Cost Savings Breakdown").Visible
Sheets("Pay Inflation - Biometrics").Visible = Not Sheets("Pay
Inflation
- Biometrics").Visible
Sheets("OT Reduction").Visible = Not Sheets("OT Reduction").Visible

The problem I have is that if I have opened a single sheet using the
button
for that sheet (in the example at top it is the Pay Inflation -
Biometrics
sheet) and I then select the button to open the group of sheets, the
Pay
Inflation - Biometrics will close since it was opened by the previous
macro..

What error checking or other conditional logic can I add so that if a
sheet
is already visible it will not be hidden.. ??
--
Thanks

Larry


.