my guess :
you've a change event handler
causing an indefinite loop.

--
keepITcool
| www.XLsupport.com | keepITcool chello nl | amsterdam


Oxns wrote in

sub gsgs()
dim fred
fred = Range("F10").value
Range("f10").value = fred + 1
end sub