Answering my self...

Just check Formulas Enabled and then use VB-script function SetFormula.
SetFormula( "z", 0)
or
SetFormula( "z+((b*0.0173)*y)", 2 )
If used some coordinate transformation eq. G54 => G55 or G92 in this case just run Y to zero before change.