Thanks for the help! Your code worked very well after I took the $ out. See
below! Again Thanks!

Msg = "Do you want to enter another Line for this grant"
vbCrLf & vbCrLf & "You have " & format (Remaingfunds,"#,###.00) &
" left!"
Title = "Enter the another Line?"
Response = MsgBox(Msg, vbYesNo + vbQuestion, Title)


"JNW" wrote:

You are close!

Msg = "Do you want to enter another Line for this grant? " & vbCrLf &
vbCrLf & "You have " & format(Remaingfunds,"$#,###.00) & " left!"
Title = "Enter the another Line?"
Response = MsgBox(Msg, vbYesNo + vbQuestion, Title)

--
JNW


"Mathew" wrote:

I'm sure this is easy but I can't find how to do using the Help. Is there
any way to format a variable within an input box so that it shows up
formatted as dollars? Like: $12,345.57 I'd like the Remaingfunds to have
the dollar format like: $12,345.57. Code is below

Msg = "Do you want to enter another Line for this grant? " & vbCrLf &
vbCrLf & "You have $" & Remaingfunds & " left!"
Title = "Enter the another Line?"
Response = MsgBox(Msg, vbYesNo + vbQuestion, Title)


Thanks for the Help!!