Патрэба памяняць ячэйкі месцамі адзін з адным пры працы ў табліцы Microsoft Excel здараецца даволі рэдка. Тым не менш, такія сітуацыі бываюць і іх трэба вырашаць. Давайце высвятлім, якімі спосабамі можна памяняць ячэйкі месцамі ў Эксэля.
перасоўванне вочак
На жаль, у стандартным наборы інструментаў няма такой функцыі, якая б без дадатковых дзеянняў або без зруху дыяпазону, магла б мяняць месцамі дзве ячэйкі. Але, у той жа час, хоць дадзеная працэдура перамяшчэння і не так простая, як хацелася б, яе ўсё ж такі можна задаволіць, прычым некалькімі спосабамі.
Спосаб 1: перасоўванне з дапамогай капіявання
Першы варыянт вырашэння праблемы прадугледжвае банальнае капіяванне дадзеных у асобную вобласць з наступнай заменай. Давайце разбярэмся, як гэта робіцца.
- Вылучаем вочка, якую варта перамясціць. Ціснем на кнопку "Капіяваць". Яна размешчана на стужцы ва ўкладцы "Галоўная" у групе налад "Буфер абмену".
- Вылучаем любы іншы пусты элемент на лісце. Ціснем на кнопку "Уставіць". Яна знаходзіцца ў тым жа блоку інструментаў на стужцы, што і кнопка "Капіяваць", Але ў адрозненне ад яе мае значна больш прыкметны выгляд з-за сваіх памераў.
- Далей пераходзім да другой вочку, дадзеныя якой трэба перамясціць на месца першай. Вылучаем яе і зноў ціснем на кнопку "Капіяваць".
- Вылучаем курсорам першую вочка з дадзенымі і ціснем на кнопку "Уставіць" на стужцы.
- Адно значэнне мы перамясцілі, куды нам трэба. Цяпер вяртаемся да таго значэння, якое мы ўставілі ў пустое вочка. Вылучаем яго і ціснем на кнопку "Капіяваць".
- Вылучаем другую вочка, у якую трэба перамясціць дадзеныя. Ціснем на кнопку "Уставіць" на стужцы.
- Такім чынам, патрэбныя дадзеныя мы памянялі месцамі. Зараз варта выдаліць змесціва транзітнай вочка. Вылучаем яе і пстрыкаем правай кнопкай мышы. У кантэкстным меню, якое Актываваць пасля гэтых дзеянняў, пераходзім па пункце "Ачысціць зьмест".
Цяпер транзітныя дадзеныя выдаленыя, а задача па перамяшчэнню вочак цалкам выканана.
Вядома, дадзены спосаб не зусім зручны і патрабуе мноства дадатковых дзеянняў. Тым не менш, менавіта ён выкарыстоўваецца і ў дачыненні большасцю карыстальнікаў.
Спосаб 2: перацягвання
Яшчэ адным спосабам, з дапамогай якога існуе магчымасць памяняць ячэйкі месцамі, можна назваць простае перацягвання. Праўда пры выкарыстанні гэтага варыянту адбудзецца зрух вочак.
Вылучаем вочка, якую трэба перамясціць у іншае месца. Усталёўваем курсор на яе мяжу. Пры гэтым ён павінен пераўтварыцца ў стрэлку, на канцы якой знаходзяцца паказальнікі, накіраваныя ў чатыры бакі. зацісканы клавішу Shift на клавіятуры і перацягваць на тое месца куды хочам.
Як правіла, гэта павінна быць сумежных вочка, так як пры пераносе такім спосабам адбываецца зрух ўсяго дыяпазону.
Таму перасоўванне праз некалькі вочак часцей за ўсё адбываецца некарэктна ў кантэксце канкрэтнай табліцы і ўжываецца даволі рэдка. Але сама патрэба памяняць змесціва далёка стаяць адзін ад аднаго абласцей не знікае, а патрабуе іншых рашэнняў.
Спосаб 3: прымяненне макрасаў
Як ужо было сказана вышэй, не існуе хуткага і карэктна спосабу ў Эксэля без капіявання ў транзітны дыяпазон памяняць дзве вочкі паміж сабой месцамі, калі знаходзяцца яны не ў сумежных абласцях. Але гэтага можна дамагчыся за кошт прымянення макрасаў ці іншых надбудоў. Аб выкарыстанні аднаго такога спецыяльнага макраса мы і пагаворым ніжэй.
- Перш за ўсё, трэба ўключыць у сябе ў праграме рэжым працы з макрасамі і панэль распрацоўніка, калі вы іх да гэтага часу не актывавалі, бо па змаўчанні яны адключаныя.
- Далей пераходзім ва ўкладку "Распрацоўнік". Выконваем пстрычка па кнопцы "Visual Basic", якая размешчана на стужцы ў блоку інструментаў "Код".
- Выконваецца запуск рэдактара. У яго трэба ўставіць наступны код:
Sub ПеремещениеЯчеек ()
Dim ra As Range: Set ra = Selection
msg1 = "Вырабіце вылучэнне ДВУХ дыяпазонаў ідэнтычнага памеру"
msg2 = "Вырабіце вылучэнне двух дыяпазонаў ідэнтычнасць памераў"
If ra.Areas.Count 2 Then MsgBox msg1, vbCritical, "Праблема": Exit Sub
If 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Пасля таго, як код устаўлены, закрываем акно рэдактара, націснуўшы на стандартызаваную кнопку закрыцця ў яго верхнім правым куце. Такім чынам код будзе запісаны ў памяць кнігі і яго алгарытм можна будзе прайграць для выканання патрэбных нам аперацый.
- Вылучаем дзве ячэйкі або два дыяпазону роўных памераў, якія хочам памяняць месцамі. Для гэтага клікаем па першым элементу (дыяпазону) левай кнопкай мышы. Затым зацісканы кнопку Ctrl на клавіятуры і таксама клікаем левай кнопкай мышкі па другой вочку (дыяпазону).
- Каб запусціць макрас, ціснем на кнопку "Макрасы", Размешчаную на стужцы ва ўкладцы "Распрацоўнік" у групе інструментаў "Код".
- Адкрываецца акно выбару макраса. Адзначаем патрэбны элемент і ціснем на кнопку "Выканаць".
- Пасля гэтага дзеяння макрас аўтаматычна змяняе змесціва вылучаных клетак месцамі.
Важна адзначыць, што пры закрыцці файла макрас аўтаматычна выдаляецца, так што ў наступны раз яго давядзецца запісваць зноў. Каб не рабіць гэтую працу кожны раз для канкрэтнай кнігі, калі вы плануеце ў ёй увесь час праводзіць падобныя перамяшчэння, то варта захаваць файл як Кнігу Excel з падтрымкай макрасаў (xlsm).
Урок: Як стварыць макрас ў Excel
Як бачым, у Excel існуе некалькі спосабаў перамяшчэння вочак адносна адзін аднаго. Гэта можна зрабіць і стандартнымі інструментамі праграмы, але дадзеныя варыянты даволі нязручныя і займаюць шмат часу. На шчасце, існуюць макрасы і надбудовы іншых распрацоўнікаў, якія дазваляюць вырашыць пастаўленую задачу максімальна лёгка і хутка. Так што для карыстальнікаў, якім даводзіцца пастаянна ўжываць падобныя перамяшчэння, менавіта апошні варыянт будзе самым аптымальным.
