Перейти до основного матеріалу

Як поміняти місцями вміст між рядками або стовпцями в Excel?

Іноді, коли ми використовуємо робочий аркуш, нам потрібно поміняти місцями рядки чи стовпці. Наприклад, я хочу обміняти стовпець A на стовпець D, перше, що мені спало на думку, це скопіювати команду copy and paste. Насправді, крім копіювання та вставки, існують і інші методи вирішення цієї проблеми.

Поміняйте місцями рядки або стовпці кодом VBA

швидко та зручно міняти місцями рядки та стовпці за допомогою Kutools для Excel

Транспонуйте дані з рядків у кілька стовпців за допомогою Kutools для Excel


1. Утримуйте клавішу ALT + F11 і відкриває Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у Модулі Вікно

Sub SwapTwoRange()
'Updateby Extendoffice
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant, arr2 As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1:", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Application.ScreenUpdating = False
arr1 = Rng1.Value
arr2 = Rng2.Value
Rng1.Value = arr2
Rng2.Value = arr1
Application.ScreenUpdating = True
End Sub

3. Потім натисніть для запуску коду вискакує діалогове вікно для вибору двох діапазонів, якими ви хочете поміняти місця, див. скріншоти:

doc обмін рядками стовпці 01 01
1
doc обмін рядками стовпці 02 02

4. Після клацання Ok, два діапазони поміняні місцями. Дивіться скріншоти:

doc обмін рядками стовпці 01 01 2 doc обмін рядками стовпці 02 02

Код може бути складним для початківців Excel, чи є простий спосіб зробити це швидко та заощадити час. Звичайно, Kutools для Excel може допомогти вам швидко та зручно міняти місцями рядки та стовпці.

Kutools для Excel : з більш ніж 300 зручними надбудовами Excel, які можна спробувати без обмежень протягом 30 днів

Якщо ви встановили Kutools для Excel, Ви можете швидко поміняти місцями два стовпці або рядки.

1. Натисніть Кутулс > Діапазон > Діапазони обміну, Див. Скріншот:

2. У Діапазони обміну діалогове вікно натисніть кнопку  кнопка від Діапазон обміну 1 щоб вибрати стовпець A, який потрібно поміняти місцями, а потім клацнути  кнопка від Діапазон обміну 2 вибрати стовпець D. ( Примітка: Діапазони для обміну повинні бути однаковими при однаковому розмірі.)

doc обмін рядками стовпці 02 02

3. Потім натисніть OK. Два стовпці поміняли місцями, а також змінили форматування комірки. Дивіться скріншоти:

doc обмін рядками стовпці 01 01 2 doc обмін рядками стовпці 02 02

З цим Діапазон обмінуs, ви не тільки можете поміняти місцями рядки або стовпці, але також можете поміняти місцями вміст двох діапазонів. Натисніть тут, щоб дізнатись більше про цю функцію.

Завантажте та безкоштовну пробну версію Kutools для Excel зараз!



Швидко транспонуйте дані з рядків у кілька стовпців на аркуші Excel:

з Kutools для ExcelАвтора Діапазон трансформації Ви можете швидко транспонувати дані з одного рядка або стовпця в кілька рядків або стовпців і навпаки.

doc транспонувати дані

Kutools для Excel: з більш ніж 300 зручними надбудовами Excel, спробуйте безкоштовно без обмежень протягом 30 днів. Завантажте та безкоштовно пробну версію зараз!


Kutools для Excel: з більш ніж 300 зручними надбудовами Excel, спробуйте безкоштовно без обмежень протягом 30 днів. Завантажте та безкоштовно пробну версію зараз!

Пов'язані статті:

Як швидко поміняти місцями вміст двох комірок в Excel?

Найкращі інструменти продуктивності офісу

Популярні функції: Знайдіть, виділіть або визначте дублікати   |  Видалити порожні рядки   |  Об’єднайте стовпці або клітинки без втрати даних   |   Раунд без Формули ...
Супер пошук: VLookup за кількома критеріями    Багатозначний VLookup  |   VLookup на кількох аркушах   |   Нечіткий пошук ....
Розширений розкривний список: Швидке створення випадаючого списку   |  Залежний спадний список   |  Виберіть розкривний список, що вибирається ....
Менеджер колонок: Додайте конкретну кількість стовпців  |  Перемістити стовпці  |  Перемкнути статус видимості прихованих стовпців  |  Порівняйте діапазони та стовпці ...
Особливості: Фокус сітки   |  Перегляд дизайну   |   Велика панель формул    Диспетчер робочих книг і аркушів   |  Бібліотека ресурсів (автотекст)   |  Вибір дати   |  Об’єднайте робочі аркуші   |  Шифрування/розшифрування клітинок    Надсилайте листи за списком   |  Супер фільтр   |   Спеціальний фільтр (фільтр жирний/курсив/закреслений...) ...
Топ-15 наборів інструментів12 текст Tools (додати текст, Видалити символи, ...)   |   50 + Графік типи (діаграма Ганта, ...)   |   40+ Практичний Формули (Розрахуйте вік на основі дня народження, ...)   |   19 вставка Tools (Вставте QR-код, Вставити зображення зі шляху, ...)   |   12 Перетворення Tools (Числа до слів, Валютна конверсія, ...)   |   7 Злиття та розділення Tools (Розширені комбіновані ряди, Розділені клітини, ...)   |   ... і більше

Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу.  Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...

вкладка kte 201905


Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу

  • Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
  • Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
  • Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
Comments (7)
Rated 5 out of 5 · 1 ratings
This comment was minimized by the moderator on the site
EXCELENTE, ni me perdí, gracias por su aporte
Rated 5 out of 5
This comment was minimized by the moderator on the site
Okk is there any way we can create a MACRO for it to do it fast bcz it won't be possible everytime to copy that code from somewhere and put it out there to Swap that Rows and Columns .
This comment was minimized by the moderator on the site
or you can just hold the shift key and drag the column where you want it to go
This comment was minimized by the moderator on the site
I've tried the VBA code solution. It seemed to work fine until now. In the range i swap, there is a URL cell (i.e. hyperlink). Although the swap looks ok, the hyperlinks are not updated. It still points to the URL of the original range. Is there any code patch to handle this? thank you.
This comment was minimized by the moderator on the site
Learn how to spell. Ridiculous. Emial. Really?
This comment was minimized by the moderator on the site
Please learn how to spell before posting on the web.
This comment was minimized by the moderator on the site
So in short, there is no built-in way to swap columns. Fail :)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations