How to strip dashes out of numbers in a variable
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 -- mikeburg ------------------------------------------------------------------------ mikeburg's Profile: http://www.excelforum.com/member.php...o&userid=24581 View this thread: http://www.excelforum.com/showthread...hreadid=387171 |
How to strip dashes out of numbers in a variable
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 "mikeburg" wrote in message ... 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 -- mikeburg ------------------------------------------------------------------------ mikeburg's Profile: http://www.excelforum.com/member.php...o&userid=24581 View this thread: http://www.excelforum.com/showthread...hreadid=387171 |
How to strip dashes out of numbers in a variable
Bernie Deitrick wrote: 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 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 |
How to strip dashes out of numbers in a variable
myVar = Application.Substitute("6-30-05","-","")
-- HTH RP (remove nothere from the email address if mailing direct) "mikeburg" wrote in message ... 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 -- mikeburg ------------------------------------------------------------------------ mikeburg's Profile: http://www.excelforum.com/member.php...o&userid=24581 View this thread: http://www.excelforum.com/showthread...hreadid=387171 |
How to strip dashes out of numbers in a variable
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 wrote in message oups.com... Bernie Deitrick wrote: 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 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 |
How to strip dashes out of numbers in a variable
Thank you very much. You all help a lot & I appreciate it! mikeburg -- mikeburg ------------------------------------------------------------------------ mikeburg's Profile: http://www.excelforum.com/member.php...o&userid=24581 View this thread: http://www.excelforum.com/showthread...hreadid=387171 |
How to strip dashes out of numbers in a variable
Bernie Deitrick wrote: 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 No, I was right the first time - I'm being pretty dumb. Str adds a leading space, not CStr. My bad. Iain |
All times are GMT +1. The time now is 02:01 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com