Ok I figured out a way to do it. The following code:

    somevar = Cells(q + 2, 2).Value
    r1 = Round(somevar, 2)
    Cells(q + 2, 2).Value = r1
It's Monday morning. Brain no worky.