Hello. I'm writing this code (I've just pasted the end of it) and it's all going well until the end. I just want to autofilter range A16 to O21 and have the filter be on A16. I'm getting an error saying subscript out of range. Why is this? Can you correct? Thanks.

ActiveWorkbook.Sheets("Income Statement").Select
Range("A16:O21").Sort Key1:=Range("C16"), order1:=xlDescending, Header:=xlYes

ActiveWorkbook.Sheets("IncomeStatement").Select
Range("A16:021").Select
Selection.AutoFilter

End Sub