Hi everyone,

I have thise short piece of code (Macro):

Dim SCell As Range
If SCell.Value < 1 Then
Range("J24").Select
Calculate
ElseIf SCell = 1 Then
End If

where "SCell" is name of a cell. I want to keep running till SCell is
"1". I know it needs a do-loop kind of thing. Anyhelp would be greatly
appreciated.

Thanks,
Jo