VBA If Statement - Select Active Cell

If statement, any way where I can, when I run the macro, choose active cell?

Ex.
Start macro
and it will ask for active cell,
check if active cell higher then 0
then set cell to color red

I have this atm:

Code:
Sub LookForValue()

' Declare Current as a worksheet object variable.
Dim Current As Worksheet

' Loop through all of the worksheets in the active workbook.
For Each Current In Worksheets

[Code] .........