select method of range class failed

[ccordner]

Any ideas why I am getting the above error?

        TargetRange = Sheets("Stations").Cells(Count, 2)
        ActiveSheet.Range(TargetRange).Select
        RowNumber = Selection.Row
        ColumnNumber = Selection.Column
        Sheets("Stations").Cells(RowNumber + 7, 6).Select
        ActiveWindow.ScrollRow = ActiveCell.Row

 

[VoG]

Try

Sheets("Stations").Select
Cells(RowNumber + 7, 6).Select

 

[MrKowz]

What line is it erroring on? What value is TargetRange returning?