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 Office 365. You can find a version of this tip for the older menu interface of Excel here: Swapping Two Strings.
Solve Real Business Problems Master business modeling and analysis techniques with Excel and transform data into bottom-line results. This hands-on, scenario-focused guide shows you how to use the latest Excel tools to integrate data from multiple tables. Check out Microsoft Excel 2013 Data Analysis and Business Modeling today!
Excel allows you to format numeric values in many different ways, including as currency. If you want to determine, in a ...
Discover MoreWhen processing a worksheet with a macro, it may be helpful to periodically recalculate the worksheet. Wouldn't it be ...
Discover MoreWhen processing information using a macro, you may need to know if there are any other instances of Excel running on a ...
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 © 2022 Sharon Parq Associates, Inc.
Comments