View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Ian Ian is offline
external usenet poster
 
Posts: 238
Default Hiding worksheets

Change you first line of code. Change A1 to suit.

If Range("A1").Value = "Electronic" Then

Note: Once Sheet 3 is not visible, selection automatically reverts to the
previous sheet (sheet 2 in my case). An alternative is to change your
second line.

Sheets("Sheet3").Visible = False

You don't need to select the sheet to hide it.

--
Ian
--
"tkaplan" wrote in
message ...

I have a drop down list in one sheet1. the cell that the drop down is in
is named "Audit". The values that user selects is "Site" or
"Electronic". if user selects "Site" i want sheet3 to be visible. if
user selects electronic, i want sheet3 to be hidden.

so my question-
how do i code this that it will only run when that cell is changed?
(if it can only be done when sheet is changed that's fine because user
can only make a couple of changes on this sheet anyway but i dont know
how to do this either)

i currently have this in the code of the worksheet:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If (Audit = "Electronic") Then
Sheets("Sheet3").Select
ActiveWindow.SelectedSheets.Visible = False
Else
Sheets("Sheet3").Visible = True
End If

End Sub

but it's not working. i assume i need some declarations, just not sure
what.

thanx in advance.


--
tkaplan
------------------------------------------------------------------------
tkaplan's Profile:
http://www.excelforum.com/member.php...o&userid=22987
View this thread: http://www.excelforum.com/showthread...hreadid=400414