Possible to limit decimal digits in message box?

[BrianAlmond]

Hi,

I'm using a message box to display a calculated number, referencing a cell using an arithmetic equation. I have the format of the cell being referenced so that it is limited to 2 decimal places. However, when the message box is displayed, the format of the number changes to 14 decimal places.

Is there any way to limit the message box format of the number to two decimal places?!

Thanks!

-Brian

 

[machopicho]

Something like this:

MsgBox (Mid(your variable, 1, Len(your variable)-12))

 

[Zakkaroo]

If your number is in A1

MsgBox Format(Range("A1").Value, "0.00")

or if you are using a defined variable

MsgBox Format(Variable, "0.00")

 

[BrianAlmond]

Thanks for the response guys, and it works great on its own!

BUT, I'm trying to accomplish something like:

Sub DailyCapacityOutput()
    MsgBox Format("The current capacity is " & Range("H100").Value, "0.00" & " loads per hour.")
End Sub

How can I get the text AND the correctly formatting value together?

 

[Zakkaroo]

Thanks for the response guys, and it works great on its own!

BUT, I'm trying to accomplish something like:

Sub DailyCapacityOutput()
    MsgBox Format("The current capacity is " & Range("H100").Value, "0.00" & " loads per hour.")
End Sub

How can I get the text AND the correctly formatting value together?

This should hopefully do the trick Brian

MsgBox "The current capacity is " & Format(Range("H100").Value, "0.00") & " loads per hour."

[Edit] Accidentally left a bracket on the end

 

[BrianAlmond]

Thank you! I appreciate the help