Как да разменяте клетки в Excel

Докато работите в Excel, често се налага да промените реда на клетките, например трябва да размените някои от тях. Как да направите това по различни начини, ще анализираме в тази статия.

Процедура за преместване на клетки

Няма отделна функция, която да ви позволява да изпълнявате тази процедура в Excel. И когато използвате стандартни инструменти, останалите клетки неизбежно ще се изместят, които след това трябва да бъдат върнати на мястото си, което ще доведе до допълнителни действия. Има обаче методи за изпълнение на задачата и те ще бъдат обсъдени по-долу.

Метод 1: Копиране

Това е може би най-лесният начин, който включва копиране на елементите на друго място със замяна на първоначалните данни. Процедурата е следната:

1. Ставаме в първата клетка (изберете я), която планираме да преместим. В главния раздел на програмата щракнете върху бутона "Копие" (група инструменти „Клипборд“). Можете също така просто да натиснете клавишната комбинация Ctrl + C.
2. Отидете до която и да е свободна клетка на листа и натиснете бутона „Вмъкване“ в същия раздел и група инструменти. Или можете отново да използвате бързите клавиши – Ctrl + V.
3. Сега изберете втората клетка, с която искаме да разменим първата, и също я копирайте.
4. Ставаме в първата клетка и натискаме бутона „Вмъкване“ (или Ctrl + V).
5. Сега изберете клетката, в която е копирана стойността от първата клетка, и я копирайте.
6. Отидете до втората клетка, в която искате да вмъкнете данни, и натиснете съответния бутон на лентата.
7. Избраните елементи са разменени успешно. Клетката, която временно съдържаше копираните данни, вече не е необходима. Щракнете с десния бутон върху него и изберете командата от менюто, което се отваря "Изтрий".
8. В зависимост от това дали има запълнени елементи до тази клетка отдясно/отдолу или не, изберете подходящата опция за изтриване и щракнете върху бутона OK.
9. Това е всичко, което трябваше да се направи, за да сменим клетките.

Въпреки факта, че за да приложите този метод, трябва да извършите много допълнителни стъпки, въпреки това той се използва от най-голям брой потребители.

Метод 2: плъзгане и пускане

Този метод се използва и за размяна на клетки, но в този случай клетките ще бъдат изместени. И така, извършваме следните действия:

1. Изберете клетката, която планираме да преместим на ново място. Преместваме курсора на мишката върху неговата граница и веднага щом промени изгледа на обичайния показалец (с 4 стрелки в различни посоки в края), натискаме и задържаме клавиша Превключване, преместете клетката на ново място с натиснат ляв бутон на мишката.
2. Най-често този метод се използва за размяна на съседни клетки, тъй като преместването на елементи в този случай няма да наруши структурата на таблицата.
3. Ако решим да преместим клетка през няколко други, това ще промени позицията на всички останали елементи.
4. След това ще трябва да възстановите реда.

Метод 3: Използване на макроси

В началото на статията споменахме, че в Excel, уви, няма специален инструмент, който ви позволява бързо да „разменяте“ клетки на места (с изключение на метода по-горе, който е ефективен само за съседни елементи). Това обаче може да се направи с помощта на макроси:

1. Първо трябва да се уверите, че така нареченият „режим за разработчици“ е активиран в приложението (изключен по подразбиране). За това:
   • отидете в менюто "Файл" и изберете от списъка вляво „Параметри“.
   • в опциите на програмата щракнете върху подраздела „Персонализиране на лентата“, от дясната страна, поставете отметка пред елемента "Разработчик" и кликнете OK.
2. Превключване към раздела "Разработчик", където щракнете върху иконата „Visual Basic“ (група инструменти "кодът").
3. В редактора, като щракнете върху бутона „Преглед на кода“, поставете кода по-долу в прозореца, който се показва:

   Sub ПеремещениеЯчеек()

   Dim ra As Range: Set ra = Избор

   msg1 = "Изведете отделяне на ДВУХ диапазона на идентичния размер"

   msg2 = "Изведете отделяне на два диапазона на ИДЕНТИЧНОГО размера"

   If ra.Areas.Count <> 2 Then MsgBox msg1, vbCritical, "Проблема": Exit Sub

   Ако ra.Areas(1).Count <> ra.Areas(2).Count Then MsgBox msg2, vbCritical, "Проблема": Exit Sub

   Application.ScreenUpdating = False

   arr2 = ra.Areas(2).Value

   ra.Areas(2).Value = ra.Areas(1).Value

   ra.Areas(1).Value = arr2

   End Sub

4. Затворете прозореца на редактора, като щракнете върху обичайния бутон под формата на кръст в горния десен ъгъл.
5. Задържане на клавиш Ctrl на клавиатурата изберете две клетки или две области с еднакъв брой елементи, които планираме да разменим. След това натискаме бутона „Макро“ (раздел "Разработчик", Група "кодът").
6. Ще се появи прозорец, в който виждаме създадения преди това макрос. Изберете го и щракнете "Изпълни".
7. В резултат на работата макросът ще размени съдържанието на избраните клетки.

Забележка: когато документът бъде затворен, макросът ще бъде изтрит, така че следващия път ще трябва да бъде създаден отново (ако е необходимо). Но ако очаквате, че в бъдеще често ще трябва да извършвате подобни операции, файлът може да бъде запазен с поддръжка на макроси.

Заключение

Работата с клетки в таблица на Excel включва не само въвеждане, редактиране или изтриване на данни. Понякога трябва да преместите или размените клетки, които съдържат определени стойности. Въпреки факта, че във функционалността на Excel няма отделен инструмент за решаване на тази задача, това може да се направи чрез копиране и след това поставяне на стойности, преместване на клетка или използване на макроси.