Format to percent in msg box
 

Hi-

I have a variable defined as a single. I am displaying in a msgbox

dim totals as single
totals = 0.08
msgbox "Your totals equal to " & totals & ". Please make sure this equals
100%", vbinformation, "Totals"

How can I format variable totals so that it displays as a percentage in the
msgbox?
--
Thanks,
Paul

Format to percent in msg box
 

try

Sub iss()

Dim totals As Single
totals = 0.08
i = totals / 100 ' remove this line if it should display 8%
total1 = Format(i, "0.00%")
MsgBox "Your totals equal to " & total1 & ". Please make sure this equals
100%", vbInformation, "Totals"
End Sub


"Paul" wrote:

Hi-

I have a variable defined as a single. I am displaying in a msgbox

dim totals as single
totals = 0.08
msgbox "Your totals equal to " & totals & ". Please make sure this equals
100%", vbinformation, "Totals"

How can I format variable totals so that it displays as a percentage in the
msgbox?
--
Thanks,
Paul