Hi everyone,

How can I format the following please :-

Worksheets("Test").Select
With ActiveCell
.Offset(1, 0).Value = cmb & " If " & pik <--- Format Right
.Offset(1, 1).Value = Tested <--- Accept Thousands & NO
Decimal Places
.Offset(1, 2).Value = tly <--- Accept Thousands & NO Decimal
Places
.Offset(1, 3).Value = 100 / Tested * tly <--- 5 Decimal Places
.Offset(1, 4).Value = Tested - tly <--- Accept Thousands & NO
Decimal Places
.Offset(1, 5).Value = (100 / Tested) * (Tested - tly) <--- 5
Decimal Places
.Offset(1, 6).Value = tly + Tested - tly <--- Accept
Thousands & NO Decimal Places
.Offset(1, 7).Value = (100 / Tested * tly) + ((100 / Tested) *
(Tested - tly)) <--- General & NO Decimal Places
.Offset(1, 0).Select
End With

Thanks in Advance.
All the Best.
Paul