Hiding Rows Without Using VBA

M

Michael

Hi everyone,

Can you do something like:

In a cell such as F1, can you type thing like: If B1=1, then hide row 1?

If there is no way but using VBA, what such a code should look like?

Regards,
Mike
 
E

Ed

Assuming you are in row 1, the VBA could be
If Range("B1") = 1 Then
ActiveCell.EntireRow.Hidden = True
End If

Ed
 
D

DavidC

Try this

If ActiveSheet.Range("B1").Value = 1 Then

ActiveSheet.Rows("1").Hidden = False

Else

End If

Best of luck
DavidC
 
M

Michael

DavidC said:
Try this

If ActiveSheet.Range("B1").Value = 1 Then

ActiveSheet.Rows("1").Hidden = False

Else

End If

Best of luck
DavidC
Click to expand...


I am using this but not working:

Set rngBlock = Workbooks(filename).Worksheets("ParetoTable").Range("B10:B59")

For Each rngCell In rngBlock
If rngCell.Value <> 1 Then
ActiveCell.EntireRow.Hidden = True
End If
Next rngCell

It gives no error but not hiding anything? Anything wrong please?

Regards,
Mike
 
B

Berend Botje

You can only hide entire rows or columns. That is why your script doe
not work
 
M

Michael Sultan

Okay, but if the range is NOT known in advance and you have to go row by
row, check, and decide row-by-row, how the above VBA piece of code can
be modified to do so?

Regards,
Mike


*** Sent via Devdex http://www.devdex.com ***
Don't just participate in USENET...get rewarded for it!
 
Top