Select text, click button, hyphens replace spaces

brucemc777 · #1 07-25-2025, 08:54 AM

I must be trying to achieve something rather useless because the only code i can find for this is:

Code:

Sub HyphenateSelection()
    Dim rng As Range
    Set rng = Selection.Range
    rng.Text = Replace(rng.Text, " ", "-")
End Sub

Whereupon i find Outlook does not use the Range Type. Either someone coded without testing or MS has once again "improved" their Outlook product.

Though i have a bit of a grasp with VBA in Excel, it looks like i'm blind in a forest bumping into trees when it comes to Outlook. Would any of you good folks help me out here?

Thank you for your consideration!

Best Regards,
-Bruce

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
How to get rid of Hyphens and spaces in result using dollartext switch	Strogg	Word	1	01-29-2019 01:43 PM
Select Cell Text to paste into Find/Replace	CBarry	Word VBA	2	02-16-2017 04:37 AM
Find, select, and replace part of text with bold	paik1002	Word VBA	4	12-07-2015 11:24 PM
Vba with three click button help	poem	Excel Programming	15	09-22-2015 09:49 PM
Animations on Button Click	dvogler	PowerPoint	1	03-01-2012 12:46 AM