Обмен двух строк (Microsoft Excel)
Если вы занимаетесь серьезным программированием макросов, в конечном итоге наступит время, когда вы захотите поменять местами значения в двух строках. В некоторых версиях BASIC есть команды, которые справляются с этим, но их нет в VBA.
Следующая очень простая техника подойдет большинству людей:
TempString = MyString1 MyString1 = MyString2 MyString2 = TempString
По завершении значения в MyString1 и MyString2 поменялись местами, и TempString не имеет значения, так как это было предназначено (с помощью этой техники)
в любом случае как временная переменная.
Если вы предпочитаете не использовать временную переменную (по какой-либо причине), вы можете использовать следующий код для замены двух строк:
MyString1 = MyString1 & MyString2 MyString2 = Left(MyString1, Len(MyString1) - Len(MyString2)) MyString1 = Right(MyString1, Len(MyString1) - Len(MyString2))
_Примечание: _
Если вы хотите узнать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах ExcelTips), я подготовил специальную страницу, содержащую полезную информацию.
link: / excelribbon-ExcelTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера]
.
ExcelTips — ваш источник экономичного обучения Microsoft Excel.
Этот совет (10207) применим к Microsoft Excel 2007, 2010, 2013, 2016, 2019 и Excel в Office 365. Вы можете найти версию этого совета для старого интерфейса меню Excel здесь:
link: / excel-Swapping_Two_Strings [Обмен двух строк]
.