ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   MsgBox String 2 (https://www.excelbanter.com/excel-programming/308539-msgbox-string-2-a.html)

ronbo

MsgBox String 2
 


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.


Harald Staff

MsgBox String 2
 
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.




Doug Glancy

MsgBox String 2
 
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.




No Name

MsgBox String 2
 
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.

.


No Name

MsgBox String 2
 

-----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!!



All times are GMT +1. The time now is 05:41 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com