Hide rows

Copper Contributor

Hi!

Some years ago I created some macros for a company just before I retired. They worked OK but some months ago appearently they stopped working. So today I was contacted to try to find out the reason.

 

The code looked like this before, when it worked. (I did find more exampels of this way to solve what I wanted to achieve).

 

Dim now As String
'
' Sort
ActiveWindow.WindowState = xlMaximized
Application.ScreenUpdating = False

now = ActiveCell.Address
Rows("10:100000").Select
Selection.RowHeight = 15
Selection.EntireRow.Hidden = True

 

The macro stops at the last row above  with this message.

"Property Hidden can not be used for class Range". Perhaps not exact this in english as I have translated from my own language.

 

Thanks for any help on how to solve. 

 

0 Replies