Access - How To Remove Spaces Between Words In TextBox And Replace With Hyphens

[gcoaster]

Hello All

GOAL - I would like to have one text box where I enter a sentence

txtKeywords: Access Is For Smart People Smarter Than I

I would like to create a button when clicked moves [txtKeywords] into another textbox [txtKeywordscomb ined] field and removes the spaces between the words and adds hyphens

txtKeywordscomb ined: Access-Is-For-Smart-People-Smarter-Than-I


Would I use the 'Replace' command in even procedures to do this? Another way? Example?
Thank you!

[Seth Schrock]

The Replace() function is way to go. I can't think of a reason to not to use it. The next simplest method would be the Split() function using the space as the delimiter and then use the Join() function using the hyphen as the delimiter. This method would allow you to manipulate the words individually within the array after you split it but before you join it back together. If this isn't necessary though, I wouldn't use it. Is there a reason that you hesitate to use the Replace() function?

[gcoaster]

Thank you for your fast reply!
I think i got it to work

=Replace([imgkeywords]," ","-")

But i have a #Type! error

I am trying to figure out how to add option to make words lowercase as well and add that into the mix. Access is fun when it work!

Lower case for instance

Before: This Is The Senence
After: this-is-the-senence


thank you Seth!

[Seth Schrock]

Only one question per thread please.

Can you verify that the imgkeywords field is a text data type? Try replacing the space with something else, like a comma and see if that changes anything. I don't think that it would be a problem, but a hyphen is also a minus sign in numbers, so I'm just trying to eliminate that possibility. Based on your formula, it looks like you have this in the control source or the default value properties of a textbox on a form. Is this form bound to a query or a table?

[NeoPa]

You can use Replace(). However, you must ensure the data passed is textual. That often means replacing Null with a value. Something like :

txtKeywordsCombined: LCase(Replace(Nz([txtKeywords],''),' ','-'))

PS. In this case the LCase() is more of an aside than a separate question so we'll allow dropping it in there as long as it doesn't become part of any discussion in here.

[gcoaster]

Thanks NeoPa! You Rock