How to strip dashes out of numbers in a variable

  • Thread starter Thread starter mikeburg
  • Start date Start date
M

mikeburg

How do you strip out dashes, convert numers to a text string, & assign
it to a variable from the following?

monthendate=6-30-05

monthendname=monthendate (need the monthendname to be 63005)

Thank so very much.

mikeburg
 
mike (who apparently doesn't like capital letters)

Dim MonthEndDate As Date
Dim MonthEndName As String
MonthEndDate = DateValue("6-30-05")
MonthEndName = CStr(Format(MonthEndDate, "mdyy"))
MsgBox MonthEndName

HTH,
Bernie
MS Excel MVP
 
Bernie said:
mike (who apparently doesn't like capital letters)

Dim MonthEndDate As Date
Dim MonthEndName As String
MonthEndDate = DateValue("6-30-05")
MonthEndName = CStr(Format(MonthEndDate, "mdyy"))
MsgBox MonthEndName

HTH,
Bernie
MS Excel MVP
Click to expand...

I think I must be being pretty dumb, but doesn't Format return a
string? Why use CStr? Plus, CStr rather idioticaly adds a space to
the left of the string, so if you do need to use it, you should use:
MonthEndName = LTrim(CStr(Format(MonthEndDate, "mdyy")))

Iain
 
myVar = Application.Substitute("6-30-05","-","")

--

HTH

RP
(remove nothere from the email address if mailing direct)
 
You're right that I didn't need it - but CStr doesn't add a space:

Dim myVal As Long
myVal = 2314
MsgBox Len(myVal) = Len(CStr(myVal))

Could you post code that shows that it does?

HTH,
Bernie
MS Excel MVP
 
Bernie said:
You're right that I didn't need it - but CStr doesn't add a space:

Dim myVal As Long
myVal = 2314
MsgBox Len(myVal) = Len(CStr(myVal))

Could you post code that shows that it does?

HTH,
Bernie
MS Excel MVP
Click to expand...

No, I was right the first time - I'm being pretty dumb. Str adds a
leading space, not CStr. My bad.

Iain
 
Back
Top