Word.Tips.Net WordTips (Menu Interface)

Replacing Text in a Macro

If you are writing macros, you probably do a lot of work with string variables. A common operation related to string variables is the need to replace one occurrence of characters in a string with another occurrence. For instance, consider the following string:

"This is my string of characters."

You might want to replace "of" with another word, such as "that has". The following general-purpose function can do just that, and much more:

Function RepText(sIn As String, sFind As String, sRep As String) As String
    Dim x As Integer

    x = InStr(sIn, sFind)
    While x > 0
        sIn = Left(sIn, x - 1) & sRep & Mid(sIn, x + Len(sFind))
        x = InStr(sIn, sFind)
    RepText = sIn
End Function

As an example of how to use the function, you can do the following:

sTemp = "This is my string of characters."
sTemp = RepText(sTemp, "of", "that has")

When this code is executed, sTemp will contain the string "This is my string that has characters."

In my routines, I often utilize a function just like RepText to remove extra spaces (replacing a two-space string with a single-space string) or replacing multiple spaces with a tab character. How you use it, of course, is entirely up to you.

Those who have used only the latest versions of VBA may be curious as to why I would use a function such as RepText rather than the built-in Replace function. While the Replace function does essentially the same thing as RepText, its addition to the VBA arsenal is a relatively new occurrence. If your macros have even the slightest possibility of being used in older versions of Word, then using Replace runs the risk of crashing your macro—it won't be available in those versions.

WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (811) applies to Microsoft Word 97, 2000, 2002, and 2003.

Related Tips:

The First and Last Word on Word! Bestselling For Dummies author Dan Gookin puts his usual fun and friendly candor back to work to show you how to navigate Word 2013. Spend more time working and less time trying to figure it all out! Check out Word 2013 For Dummies today!


Leave your own comment:

  Notify me about new comments ONLY FOR THIS TIP
Notify me about new comments ANYWHERE ON THIS SITE
Hide my email address
*What is 5+3 (To prevent automated submissions and spam.)
           Commenting Terms

Comments for this tip:

There are currently no comments for this tip. (Be the first to leave your comment—just use the simple form above!)

Our Company

Sharon Parq Associates, Inc.

About Tips.Net

Contact Us


Advertise with Us

Our Privacy Policy

Our Sites


Beauty and Style




DriveTips (Google Drive)

ExcelTips (Excel 97–2003)

ExcelTips (Excel 2007–2016)



Home Improvement

Money and Finances


Pests and Bugs

Pets and Animals

WindowsTips (Microsoft Windows)

WordTips (Word 97–2003)

WordTips (Word 2007–2016)

Our Products

Helpful E-books

Newsletter Archives


Excel Products

Word Products

Our Authors

Author Index

Write for Tips.Net

Copyright © 2016 Sharon Parq Associates, Inc.