Email from workbook

[VbaHell]

Hello all

I am currently using a macro to email an active line from a workbook, all works ok except the Gross profit figure show in the email body as 15.6367342

How can I code tag or format the code to show only one decimal point please 15.6

 GP = Range("I" & ActiveCell.Row)

objmail.Body = "Can you please process our request:" & vbNewLine & vbNewLine & _
        "Gross Profit % " & "" & GP & "" & vbNewLine & _

 

[JazzSP8]

Depending on how you want it to round...

GP = Round(Range("I" & ActiveCell.Row),1)

GP = RoundUp(Range("I" & ActiveCell.Row),1)

Annnnddddd...

GP = RoundDown(Range("I" & ActiveCell.Row),1)

 

[VbaHell]

spot on JazzSP8, thanks very much