If the cells you are showing are aleady properly formatted on the worksheeet,
then use:

Sheets("sums").Range("c4").Text

in place of

Sheets("sums").Range("c4").Value
--
Gary''s Student
gsnu200708


"Jim G" wrote:

I currently use,
MsgBox "Total Sales Value of All Jobs is: " &
Sheets("Sums").Range("b4").Value & vbNewLine & _
" " & vbNewLine & _
"Total Cost of Current Jobs is " & Sheets("sums").Range("c4").Value
& vbNewLine & _
" " & vbNewLine & _
"The Average Margin is " & Sheets("sums").Range("e4").Value, _
, "Summary of Active Jobs"

To provide a summary of the results in the nominated cells. The result is
unformatted. What do I need to add to format into $ and %.

Thanks for the help
--
Jim