Runtime Error 13

[JayRD]

I'm getting a runtime error 13 on the following line:
Rows("TTT5:65536").EntireRow.Hidden = True

What do I need to do to correct the problem.


ENTIRE MACRO ====>

Sub Macro4()
'
' Macro4 Macro

Dim TTT5
Set TTT5 = Worksheets("Step One").Cells(24, "E")
Application.Run _
"'Copy of BID TABULATOR-A 2005 (version 2).xls'!DropDown4_Change"
Sheets("Sheet2").Select
Rows("TTT5:65536").EntireRow.Hidden = True
End Sub

 

[PHV]

Rows(TTT5 & ":65536").EntireRow.Hidden = True

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886