Written by Allen Wyatt (last updated July 4, 2020)
This tip applies to Excel 2007, 2010, 2013, 2016, 2019, and Excel in Microsoft 365
If you do any serious macro programming, there will eventually come a time when you want to swap the values in two strings. In some versions of BASIC, there are commands that handle this, but there isn't in VBA. The following very simple technique should do the trick for most people:
TempString = MyString1 MyString1 = MyString2 MyString2 = TempString
When completed, the values in MyString1 and MyString2 have been swapped, and TempString doesn't matter, since it was intended (by this technique) as a temporary variable anyway.
If you prefer to not use a temporary variable (for whatever reason), you could use the following code to swap two strings:
MyString1 = MyString1 & MyString2 MyString2 = Left(MyString1, Len(MyString1) - Len(MyString2)) MyString1 = Right(MyString1, Len(MyString1) - Len(MyString2))
Note:
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (10207) applies to Microsoft Excel 2007, 2010, 2013, 2016, 2019, and Excel in Microsoft 365. You can find a version of this tip for the older menu interface of Excel here: Swapping Two Strings.
Excel Smarts for Beginners! Featuring the friendly and trusted For Dummies style, this popular guide shows beginners how to get up and running with Excel while also helping more experienced users get comfortable with the newest features. Check out Excel 2013 For Dummies today!
Want to have you macro completely hide the Excel interface? You can do so by using the Visible property for the Excel ...
Discover MoreNeed to click on a cell and have it replaced with an "X"? Macros make it easy to do, as illustrated in this tip.
Discover MoreWhen reading information from a text file, your macro may need to start reading at a place other than the beginning of ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2021-07-13 09:37:06
Willy Vanhaelen
Here is another shorter way to swap the strings without the temp variable:
MyString1 = MyString1 & Chr(0) & MyString2
MyString2 = Split(MyString1, Chr(0))(0)
MyString1 = Split(MyString1, Chr(0))(1)
I used the Chr(0) delimiter because I am sure this will never appear in a string.
Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2023 Sharon Parq Associates, Inc.
Comments