Using an If statement in vba for multiple records in a range

[mrtauntaun]

Hi all. I am using the following bit of code:

Dim rngCalc As Range
Set rngCalc = Range("AD2:AD" & Cells(Rows.Count, 1).End(xlUp).Row)
rngCalc.Formula = "=(8-K2)"
rngCalc.Value = rngCalc.Value

In this case, the first cell to be replaced is AD2 and it continues for as many rows as I have. What I want to do is use some If statements in conjuction with this, and have these if statements run for each cell (AD2, AD3, AD4, etc)
So in this case, if AD2 = 7 then xxxxxxxxxxxxxx
And so on. Im not sure how to word it. Should it be 'if rngcalc.value = 7'?
I tried that and got a type mismatch. Any help would be appreciated with this, thanks!!!!

[Static]

If Range("AD2") = 7 then......

[mrtauntaun]

Thank you for the reply.
I tried that, but that only changed AD2. The other cells that = 7 remained at 7. Is there a way to get the code to check for every cell in the range?

[Static]

Loop it...

For x = 2 to whatever (row count)
   If range("AD" & x) = 7 Then
     'do something
   End If
Next

[mrtauntaun]

Outstanding. Thank you for your help!