Thanks, I think that is exactly what I need to do. However, I am not able to
refer to the right combobox. How do I do that? I tried various things
including
combobox(Drop Down 3).visible=false but they just stopped the whole code
from working.

Sorry for being so ignorant. I am a total beginner with VB.

Thanks!

--
Johanna


"BlackSun" wrote:

Il 08/02/2010 12.52, Johanna Gronlund ha scritto:
Hello,

I have a code that hides certain rows in sheets 3 and 4. Is there a way to
make 'Drop Down 3' and 'Drop Down 4' hidden when rows as per Case 2 are
hidden? The code I have so far is below:

Sub ComboBox1_Change()
' Combobox Value Is changed
varData = Range("B27").Value2
' unhide ranges
On Error GoTo 100
Application.ScreenUpdating = False
Sheet3.Range("A58:A68").EntireRow.Hidden = False
Sheet4.Range("A150:A185").EntireRow.Hidden = False
Sheet3.Range("A35:A57, A26").EntireRow.Hidden = False
Sheet4.Range("A12:A148").EntireRow.Hidden = False

Select Case varData
Case 2
Sheet3.Range("A58:A68").EntireRow.Hidden = True
Sheet4.Range("A150:A185").EntireRow.Hidden = True
Case 3
Sheet3.Range("A35:A57, A26").EntireRow.Hidden = True
Sheet4.Range("A12:A148").EntireRow.Hidden = True
End Select
100:
Application.ScreenUpdating = True
End Sub

Many thanks in advance.

Hi,
if I have understood what you need; in the case statement, where you
hide the rows, set combobox.visible=false.


--
Ciao BlackSun
.