How do I get a MsgBox to display the value of a string
rather then the string name?
i.e.

Dim sName As String, sDate As String

sName = (Left(Range("B1"), 4))
sDate = "" & Format(DateSerial(Year(Date), Month
(Date) - 1, 1), " mmm yy ")

MsgBox "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

End Sub

and I get "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

I do not get the values of sName or sDate.

What am I doing wrong?

Thanks to Jim and Frank for their ideas. However using
Franks = "Invalid Qualifier" and Jim's = C:\Documents and
Settings\UserName\MyDocuments\sDate & EOM INFO\DATA INPUT

Thanks for any help.

By NOT having it somewhere between a couple of quotes. Try this:

Sub test()
Dim S As String
Dim L As Long

S = " fish for sale"
L = 400

MsgBox L & S
MsgBox "L" & S
MsgBox L & "S"
MsgBox "L" & "S"
MsgBox "L & S"

End Sub

HTH. Best wishes Harald

"Ronbo" skrev i melding
...


How do I get a MsgBox to display the value of a string
rather then the string name?
i.e.

Dim sName As String, sDate As String

sName = (Left(Range("B1"), 4))
sDate = "" & Format(DateSerial(Year(Date), Month
(Date) - 1, 1), " mmm yy ")

MsgBox "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

End Sub

and I get "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

I do not get the values of sName or sDate.

What am I doing wrong?

Thanks to Jim and Frank for their ideas. However using
Franks = "Invalid Qualifier" and Jim's = C:\Documents and
Settings\UserName\MyDocuments\sDate & EOM INFO\DATA INPUT

Thanks for any help.

Ronbo,

Try this:

MsgBox "C:\Documents and Settings\UserName\My
Documents\" & sName & sDate & "EOM INFO\DATA INPUT."

hth,

Doug Glancy

"Ronbo" wrote in message
...


How do I get a MsgBox to display the value of a string
rather then the string name?
i.e.

Dim sName As String, sDate As String

sName = (Left(Range("B1"), 4))
sDate = "" & Format(DateSerial(Year(Date), Month
(Date) - 1, 1), " mmm yy ")

MsgBox "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

End Sub

and I get "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

I do not get the values of sName or sDate.

What am I doing wrong?

Thanks to Jim and Frank for their ideas. However using
Franks = "Invalid Qualifier" and Jim's = C:\Documents and
Settings\UserName\MyDocuments\sDate & EOM INFO\DATA INPUT

Thanks for any help.

change Jims from:
MsgBox "C:\Documents and Settings\Ron Bowman\My
Documents\" & sName & "sDate & EOM INFO\DATA INPUT."
to
MsgBox "C:\Documents and Settings\Ron Bowman\My
Documents\" & sName & sDate & " EOM INFO\DATA INPUT."

-----Original Message-----


How do I get a MsgBox to display the value of a string
rather then the string name?
i.e.

Dim sName As String, sDate As String

sName = (Left(Range("B1"), 4))
sDate = "" & Format(DateSerial(Year(Date), Month
(Date) - 1, 1), " mmm yy ")

MsgBox "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

End Sub

and I get "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

I do not get the values of sName or sDate.

What am I doing wrong?

Thanks to Jim and Frank for their ideas. However using
Franks = "Invalid Qualifier" and Jim's = C:\Documents and
Settings\UserName\MyDocuments\sDate & EOM INFO\DATA INPUT

Thanks for any help.

.

-----Original Message-----
Ronbo,

Try this:

MsgBox "C:\Documents and Settings\UserName\My
Documents\" & sName & sDate & "EOM INFO\DATA INPUT."

hth,

Doug Glancy

"Ronbo" wrote in
message
...


How do I get a MsgBox to display the value of a string
rather then the string name?
i.e.

Dim sName As String, sDate As String

sName = (Left(Range("B1"), 4))
sDate = "" & Format(DateSerial(Year(Date), Month
(Date) - 1, 1), " mmm yy ")

MsgBox "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

End Sub

and I get "C:\Documents and Settings\UserName\My
Documents\& sName & sDate & EOM INFO\DATA INPUT."

I do not get the values of sName or sDate.

What am I doing wrong?

Thanks to Jim and Frank for their ideas. However using
Franks = "Invalid Qualifier" and Jim's = C:\Documents
and
Settings\UserName\MyDocuments\sDate & EOM INFO\DATA
INPUT

Thanks for any help.



.
Thanks a lot for your help. It works!!