I need to filter a column removing blank entries, then select the cell(s) left. I used the code below to select the cells with multiple entries left, the problem is that when I only have one entry, the macro ctrl+shifts down with no end cell. I'm not sure If I Need some kind of count variable or just an if statement, but any help is appreciated.

'Filter Column C
    Columns("C:C").Select
    Selection.AutoFilter
'Filter for Blanks
    ActiveSheet.Range("$C$1:$C$36").AutoFilter Field:=1, Criteria1:="<>"
'Highlight Cell(s) Orange and make text white
'Range subject to change
    Range("C8").Select '(first entry)
    Range(Selection, Selection.End(xlDown)).Select '<--- problem