Hi,

We've recently updated our computers and as such moved from Excel 2000 to Excel 2010. It became immediately obvious that some of the macros which ran almost instantaneously in Excel 2000 have now become sluggish in Excel 2010. One of these macros is used to hide a row in a given range dependant on the value ("True" or "False") given in a helper column as well as resizing and auto fitting the rows in this range. Code below.

Sub Autofit_HideRows()

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Dim rRow As Range
With Range("B10:B391").EntireRow
.Autofit
For Each rRow In .Rows
If rRow.RowHeight < 30 Then rRow.RowHeight = 30
Next rRow
End With

Range("A10:A379").Select
For Each Cell In Selection
If Cell = False Then
Range(Cell.Address).EntireRow.Hidden = True
End If
Next
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub

I've tried searching for ways to speed up the process with no luck so here I'm asking for advice.

Thanks in advance.