Forum Discussion
Hiding Columns Based on a Cell Value
Hello,
I added the following VBA into the module and set B4 =0, but it wont hide column H. I am not sure why. the information is in sheet 1
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("B4").Value = 0 Then
Columns("H").EntireColumn.Hidden = True
Else
Columns("H").EntireColumn.Hidden = False
End If
End Sub
Thanks,
Sam
SamFares40 your problem is WHERE you put that VBA code. You put it in Module1, but the Worksheet_SelectionChange needs to be in the sheet it is meant to act on, in this case Sheet1 (expand Microsoft Excel Objects to find it). I move it to that code sheet and it worked fine.
6 Replies
SamFares40 your problem is WHERE you put that VBA code. You put it in Module1, but the Worksheet_SelectionChange needs to be in the sheet it is meant to act on, in this case Sheet1 (expand Microsoft Excel Objects to find it). I move it to that code sheet and it worked fine.
Thank you so much mtarler
SamFares40 Tried your code, without any modification. Works perfect on my end. BUT.... be aware that when cell B4 is empty it is also seen as -zero- and column H gets hidden. Enter anything else, and column H reappears.
Thank you Riny_van_Eekelen!!
Did you use the excel sheet that i attached. In the screen shot below from the excel sheet that i uploaded earlier, it is not hiding column "H". What am I doing wrong?
Thanks,
Sam
SamFares40 Must have missed that one, as I created a new file and inserted your code. Now that I used yours it doesn't work. But, when I create a new file it does (for me at least). Attached "my" file.
