Как переместить столбец или строку в Excel, не заменяя и не перезаписывая существующие данные?
При работе в Excel вам часто может понадобиться изменить положение столбца или строки на листе для улучшения читаемости или удовлетворения определённых требований к организации данных. Однако вас может беспокоить, что при перемещении столбца или строки важные существующие данные в новом месте будут перезаписаны. В этой статье мы представим несколько практических подходов, которые позволят вам перемещать столбцы или строки в новые места без замены или перезаписи какой-либо существующей информации. Каждый метод имеет свои преимущества и рекомендации по применению, поэтому вы сможете выбрать тот, который лучше всего соответствует вашим потребностям.
Перемещение столбца/строки без замены существующих данных с помощью перетаскивания
Перемещение столбца/строки без замены существующих данных с помощью вырезания и вставки
Легкое перемещение столбца с помощью Kutools для Excel
Код VBA — программное перемещение столбцов или строк в заданные места
Перемещение столбца/строки без замены существующих данных с помощью перетаскивания
Один из самых простых способов изменить положение столбцов или строк в Excel, не перезаписывая существующие данные, — это перетащить их в нужное место, удерживая клавишу Shift. Этот метод быстр и эффективен для таблиц небольшого и среднего размера.
Применимые сценарии и примечания: Перетаскивание идеально подходит для листов с умерённым объёмом данных, где важно точное размещение. Этот метод удобен для пользователя, однако может оказаться менее практичным при работе с очень большими наборами данных или при одновременном перемещении нескольких столбцов и строк.
1. Щёлкните заголовок столбца или номер строки, которую хотите переместить, чтобы выделить весь этот столбец или строку.
2. Переместите курсор на границу выделенного столбца или строки, пока он не превратится в четырёхстороннюю стрелку 
, затем удерживайте клавишу Shift и перетащите столбец или строку в нужное место между существующими столбцами или строками. Во время перетаскивания появится бледный контур, показывающий, куда будут вставлены данные. См. снимок экрана:
Теперь выделенный столбец или строка переместятся на новое место, а все существующие данные автоматически сдвинутся, освобождая пространство и гарантируя, что ни одна информация не будет перезаписана.
Советы: Обязательно удерживайте клавишу Shift во время перетаскивания. В противном случае Excel может перезаписать целевой столбец или строку вместо того, чтобы сдвинуть их и освободить место. Если появится всплывающее сообщение «Вы хотите заменить содержимое ячеек назначения?», скорее всего, вы забыли удерживать клавишу Shift. Нажмите отмену (Ctrl+Z), чтобы вернуться к предыдущему состоянию, и повторите попытку.
Легко перемещайте столбец без замены существующих данных на листе:
Панель Столбцы в Kutools для Excel позволяет быстро изменять порядок столбцов на листе, как показано в демонстрации ниже.
Скачайте и попробуйте прямо сейчас! (30-дневная бесплатная пробная версия)
Перемещение столбца/строки без замены существующих данных с помощью вырезания и вставки
Другой подход Общие к перемещению столбца или строки без перезаписи существующей информации — вырезать и вставить выделение. Этот вариант позволяет точно разместить данные и автоматически сдвигает другие столбцы или строки, чтобы освободить место для нового расположения.
1. Выделите весь столбец или строку, которую хотите переместить. Щёлкните правой кнопкой мыши заголовок столбца или номер строки, затем выберите в контекстном меню команду Вырезать.
2. Далее щёлкните правой кнопкой мыши над (для столбцов) или слева (для строк) от места, куда вы хотите вставить вырезанные данные. В контекстном меню выберите команду Вставить вырезанные ячейки. См. снимок экрана:
Вырезанный столбец или строка будут вставлены в указанное место, аккуратно сдвинув существующие данные в сторону — без их перезаписи.
Легкое перемещение столбца с помощью Kutools для Excel
Если вы часто переставляете столбцы или работаете с очень широкими таблицами данных, утилита Столбцы в Kutools для Excel — именно то, что вам нужно! Она выводит панель со списком всех столбцов для мгновенной навигации и позволяет легко перемещать столбцы вверх или вниз простым перетаскиванием, превращая сложную реорганизацию в пару движений мыши.
1. Перейдите на вкладку Kutools и нажмите Навигация, чтобы открыть Панель Kutools. См. снимок экрана:
2. Панель «Навигация Kutools» появится слева в окне Excel. Далее:
Преимущества: Этот метод особенно полезен при работе с крупными и сложными листами или когда вам часто нужно просматривать структуру данных. Все перемещения полностью безопасны для данных, гарантируя сохранность исходной информации в любое время.
Если вы хотите воспользоваться бесплатной пробной версией (30 дней) этой утилиты, нажмите, чтобы скачать её, а затем выполните операцию в соответствии с приведёнными выше шагами.
Код VBA — программное перемещение столбцов или строк в заданные места
Для опытных пользователей или тех, кому нужно автоматизировать перемещение столбцов или строк по множеству листов, решение на основе VBA обеспечивает гибкий способ программного перемещения данных в новые места без перезаписи существующего содержимого. Этот метод хорошо подходит для повторяющихся задач или при работе с большими наборами данных, требующими последовательной реорганизации.
Применимые сценарии и примечания: Код VBA особенно полезен, когда нужно программно переместить несколько столбцов или строк, а также применить перемещение ко множеству листов в книге. Всегда сохраняйте книгу перед запуском скриптов VBA — эти действия трудно отменить. Используйте этот подход после снятия защиты с листов, чтобы избежать ошибок.
1. Откройте свою рабочую книгу Excel и нажмите Alt + F11, чтобы открыть редактор VBA. В окне VBA выберите команду Вставка > Модуль, чтобы добавить новый модуль кода.
Sub MoveColumnOrRow()
Dim WorkRng As Range
Dim Target As Range
Dim xTitleId As String
Dim MoveType As String
Dim isColumn As Boolean
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.InputBox("Select the column or row to move:", xTitleId, "", Type:=8)
If WorkRng Is Nothing Then Exit Sub
MoveType = Application.InputBox("Type 'C' for column or 'R' for row", xTitleId, "C", Type:=2)
isColumn = (UCase(MoveType) = "C")
If isColumn Then
Set Target = Application.InputBox("Select the column before which to move:", xTitleId, "", Type:=8)
If Target Is Nothing Then Exit Sub
WorkRng.EntireColumn.Cut
Target.EntireColumn.Insert Shift:=xlToRight
Else
Set Target = Application.InputBox("Select the row before which to move:", xTitleId, "", Type:=8)
If Target Is Nothing Then Exit Sub
WorkRng.EntireRow.Cut
Target.EntireRow.Insert Shift:=xlDown
End If
End Sub2. После ввода кода закройте редактор VBA. Чтобы запустить макрос, нажмите Alt + F8, выберите в списке макросов элемент MoveColumnOrRow и нажмите кнопку Выполнить. Макрос предложит вам выбрать столбец или строку для перемещения, указать, является ли это столбцом или строкой, а также задать целевое расположение. Он программно переместит выбранный столбец или строку перед указанным местом назначения, автоматически сдвинув существующие данные и избегая их перезаписи.
Устранение неполадок: Если код не работает, проверьте, защищён ли ваш лист или содержит ли он объединённые ячейки. Для наилучших результатов отмените объединение ячеек и убедитесь, что лист разблокирован перед запуском макроса. Всегда сохраняйте книгу перед запуском VBA — это поможет избежать потери данных в случае непредвиденных ошибок.
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек