For Next Loop not working

Hello all

I know it has to be something simple, but I just don't see why this little for next loop doesn't work. Can anyone tell me?

Thanks!

    For b = 3 To 9
        If Cells(25, b).Value > TimeSerial(0, 0, 0) And _
            Cells(25, b).Value <= TimeSerial(13, 0, 0) Then
                Cells(26, b).Value = OutBoundPerDiem(CityTierRank, 1)
        If Cells(25, b).Value > TimeSerial(13, 0, 0) Then
            Cells(26, b).Value = OutBoundPerDiem(CityTierRank, 2)
        End If
    Next b

It is supposed to evaluate the departure time in order to enter the correct per diem expense into the cell in row 26. I keep getting a "Next without For" error on debug.