Message Box "Value"

S

saziz

Hi All,
I have written a macro to do several calculations in several sheets.
Now I want to put the answer in a message box. The answer is in a
defined field. All I am trying to do is "the answer is" & "here I want
to give address of the defined filed"
How can I do that?
Thanks for ur help.
Syed
 
B

Bob Phillips

Do you mean

MsgBox "The answer is in A1"

or

MsgBox "The answer is " & Range("A1").Value

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
S

saziz

Bob,
I mean the second of ur two. MsgBox "The answer is " &
Range("A1").Value
I will try this.
Thanks
 
S

saziz

Hi Bob,
I tried following:
MsgBox "The Average is" & Sheet3!Range("p2").Value
It says 'Object required'
Syed
 
A

anilsolipuram

you extract the value from Sheet3 at p2 cell, it should
sheets("Sheet3").Range("p2").Value


try this

MsgBox "The Average is" & sheets("Sheet3").Range("p2").Valu
 
S

saziz

Thank you Anil it is working. How can I restrict decimal places, it is
giving me all 14 decimal places. Is there a format syntax?
Thank you
 
A

anilsolipuram

Yes use
format(sheets("Sheet3").Range("p2").Value,"#.##")
this will give two decimal places

MsgBox "The Average is"
format(sheets("Sheet3").Range("p2").Value,"#.##"
 
S

saziz

Anil,
Can you please show me how to increase the font size in message box?
what would be the syntax?
Thanks
 
E

Elizabeth

Anil:
Is there a way to format a number in a msgbox if it is: 1) preceded by
text, & 2) calculated in the code, not drawn from a worksheet? I want to
display a message similar to this example ("The sum is: ") with the number in
123,456 format. I am able to format the number alone using the following
code, but I can't figure out how to add "The sum is: " and retain the comma
formatting.
MsgBox prompt:=Format(expression:=totalvar, Format:="0,0")
Thank you for any suggestions!
Elizabeth
 
Top