Sub test
	dim value as single

'must be single - with double the problem dissapears
	sheet=thiscomponent.sheets(0)
	value = 12.51	
'value - any number with decimal part except *****.0 and *****.5
'(for example 12.0 and 12.5 are not valid)
	print value
'messaging value 12.51 - it's OK
	sheet.getcellbyposition(0,0).value = value
	print sheet.getcellbyposition(0,0).value
'must be 12.51 but we get 12.5100002288818 
End sub