Hiding Columns

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I need to know how to do this for rows instead of columns.
I have the same issue but with rows instead.


Public Sub MyHide()
Dim rngCell As Range
Dim lngNumColumns As Long

Application.ScreenUpdating = False

lngNumColumns = ActiveSheet.UsedRange.Columns.Count

For Each rngCell In Range("A3").Resize(1, lngNumColumns)
With rngCell
.EntireColumn.Hidden = (.Value = 1)
End With
Next rngCell

Application.ScreenUpdating = True
End Sub
 
hi.
read through your code. where is says column, change that to row. if it says
columns, change that to rows. the command to hide and unhide rows and columns
is the same except for row or column.

regards
FSt1
 
Thank you so much. I did want to touch anything and mess up what I have
already did.

Thanx,
 
Back
Top