cells references

[montecarlo2012]

Hi, I am trying to make better, so instead of

A = Range("B2").Value
B = Range("B3").Value
C = Range("B4").Value
E = Range("B5").Value
F = Range("B6").Value
G = WorksheetFunction.RoundUp(Abs(A + (1 + (B / C) * (E - F)) / 2), 0)
Range("B2").Value = G
I am trying to use this
Cells(2, 4).value = "=worksheetFunction.RoundUp(Abs(Cells(2, 2).Value + (1 + (Cells(3, 2).Value / (Cells(4, 2).Value * (Cells(5, 2).Value - Cells(6, 2).Value) / 2)))), 0)"

I need a hand here.
Thanks

 

[MARK858]

Maybe...

Cells(2, 4).Value = WorksheetFunction.RoundUp(Abs(Cells(2, 2).Value + (1 + (Cells(3, 2).Value / (Cells(4, 2).Value) * (Cells(5, 2).Value - Cells(6, 2).Value) / 2))), 0)

 

[montecarlo2012]

Thank you
Mark 858
I got error 6
over flow

 

[MARK858]

What values do you have in the cells as I get no error with

Book1.xlsb
	B
2	19
3	10
4	20
5	17
6	18
7	45
Sheet5

 

[montecarlo2012]

Thank you Mark, is working. I marked solution.

 

[MARK858]

You're welcome