Assign Cell value to a variable

[Pergo]

Hello all,

Long time-- no post. Hope all is well!

I need some assistance with a macro I'm working on. This should be pretty simple.

I need to take the value of cell C8 on the Home Tab of my active workbook and assign it to a variable (I believe an integer). The variable will be used as a date filter. (The input cell is a short date).

Here is what I have:

Dim filterdate As Integer
filterdate = ActiveWorkbook.Worksheets("Home").Range("C8").Value

ActiveSheet.Range("A1:AD" & intRowCount).AutoFilter Field:=13, Criteria1:= _
        ">=" & filterdate, Operator:=xlAnd

Thanks again!!