Як выкарыстоўваць зрушэнне дыяпазону VBA (11 спосабаў)

  • Падзяліцца Гэтым
Hugh West

Калі вы шукаеце некалькі самых простых спосабаў выкарыстання VBA Range Offset, гэты артыкул будзе таго варты. Давайце пачнем са спосабаў выкарыстання VBA Range Offset.

Спампаваць кнігу

VBA Range Offset.xlsm

11 спосабаў выкарыстання зрушэння дыяпазону VBA

У мяне ёсць наступная табліца даных, якая змяшчае інфармацыю студэнтаў аб каледжы. Выкарыстоўваючы гэты набор даных, я растлумачу спосабы выкарыстання VBA Зрушэння дыяпазону.

Для гэтай мэты я выкарыстаў версію Microsoft Excel 365 , вы можаце выкарыстоўваць любую іншыя версіі ў залежнасці ад вашага зручнасці.

Спосаб 1: Выбар ячэйкі з дапамогай дыяпазону VBA

Тут мы абярэм ячэйку з імем Даніэль Дэфо. Для гэтага мы будзем выкарыстоўваць функцыю RANGE у VBA .

Крок-01 :

➤Перайсці да Распрацоўшчык Укладка>> Visual Basic Параметр

Затым, Адкрыецца рэдактар ​​Visual Basic .

➤Перайдзіце да Уставіць Укладку>> Модуль Параметр

Пасля гэтага будзе створаны Модуль .

Крок-02 :

➤Напішыце наступны код

9996

Ён вылучыць ячэйку B8 .

➤Націсніце F5

Вынік :

Такім чынам, вы атрымаеце абраную ячэйку, якая змяшчае Даніэль Дэфо .

Дадатковая інфармацыя: Як выкарыстоўваць аб'ект дыяпазону VBA ў Excel

Спосаб 2: Вылучэнне групы сумежных ячэек з выкарыстаннем дыяпазону VBA

Вы можаце выбраць дыяпазон сумежных ячэек, такіх як слупок Імя студэнта і слупок Вынік у наступную табліцу, прытрымліваючыся гэтага метаду.

Крок-01 :

➤Выканайце Крок-01 з Метад-1

8305

Ён выбярэ ячэйкі ад B5 да C10 .

➤Націсніце F5

Вынік :

Пасля гэтага вы атрымаеце ячэйкі ў Слупку B і Слупок C абраны.

Спосаб 3: Выбар групы несумежных вочак з дапамогай дыяпазону VBA

Выкажам здагадку, вы хочаце выбраць студэнтаў з імем Уільям Дэвід і Майкл Энтані з іх адпаведнымі ідэнтыфікатарамі электроннай пошты . Каб выбраць гэтыя неадпаведныя ячэйкі, вы можаце прытрымлівацца гэтага метаду.

Крок-01 :

➤Выконвайце крок -01 з Метад-1

3016

Выберуць ячэйкі B6 , D6 , B9, і D9 .

➤Націсніце F5

Вынік :

Тады вы атрымаеце ячэйкі, якія змяшчаюць імя студэнта Уільям Дэвід , Майкл Энтані, і іх адпаведны ідэнтыфікатар электроннай пошты абраны.

Спосаб 4: Вылучэнне групы несумежных ячэек і дыяпазону з дапамогай дыяпазону VBA

Вы можаце выбраць дыяпазон ячэек і некалькі несумежных ячэек адначасова прытрымліваючыся гэтагаметад.

Крок-01 :

➤Выканайце Крок-01 з Метад- 1

3355

Будзе выбраны дыяпазон ячэек у дыяпазоне B5:B10 і дзве іншыя ячэйкі D6 , D10 .

➤Націсніце F5

Вынік :

Пасля гэтага вы атрымаеце ячэйкі ў слупку Імя студэнта і два ідэнтыфікатары электроннай пошты для Уільяма Дэвіда і Дональда Пола выбраны.

Спосаб 5: Выбар дыяпазону з дапамогай зрушэння дыяпазону VBA

Вы можаце выбраць дыяпазон вочак у слупку імя студэнта з дапамогай Функцыя OFFSET .

Крок-01 :

➤Выканайце Крок-01 з Метад-1

8461

Спачатку Range(“A1:A6”) выбярэ дыяпазон A1:A6 , а потым Зрушэнне(4, 1) перамесціцца на 4 радкі ўніз ад ячэйкі A1 і 1 слупка ў правы бок. Пасля гэтага адсюль будзе выбрана роўная колькасць вочак у дыяпазоне A1:A6 .

➤Націсніце F5

Вынік :

Такім чынам вы вылучыце слупок Імя студэнта .

Спосаб 6: зрушэнне дыяпазону VBA адмоўнае

Вы можаце выбраць слупок ідэнтыфікатара электроннай пошты , прытрымліваючыся гэтага метаду.

Крок-01 :

➤Выконвайце Крок-01 з Метад-1

5892

Спачатку Дыяпазон(“F11:F16”) выбярэ дыяпазон F11:F16 , а потым Зрушэнне(-6, -2) перамесціцца на 6 радкі ўверх ад ячэйкі F11 і 2 слупкі злева. Пасля гэтага адсюль будзе выбрана роўная колькасць вочак у дыяпазоне F11:F16 .

➤Націсніце F5

Вынік :

Пасля гэтага вы зможаце выбраць слупок Ідэнтыфікатар электроннай пошты .

Падобныя паказанні:

  • VBA для кожнай ячэйкі ў дыяпазоне ў Excel (3 метады)
  • Як палічыць тэкст у Excel (7 простых прыёмаў)

Спосаб 7: выбар дыяпазону адносна актыўнай ячэйкі

Тут, у нас ёсць актыўная ячэйка (ячэйка A1 ), і ў дачыненні да гэтай ячэйкі мы абярэм дыяпазон даных у гэтым метадзе.

Крок-01 :

➤Выконвайце Крок-01 з Метад-1

6006

Тут, activecell гэта A1

Першая частка activecell.Offset(4, 1) выбярэ ячэйку на 4 радкі ўніз і 1 слупок справа ад ячэйкі A1 і другая частка activecell.Offset(9, 3) выбярэ ячэйку на 9 радкоў уніз і 3 слупкі справа ад ячэйкі A1 .

Нарэшце, усе клетак паміж гэтымі двума ячэйкі будуць выбраны.

➤Націсніце F5

Вынік :

Затым , вы зможаце выбраць увесь дыяпазон даных.

Спосаб 8: Скапіруйце дыяпазон

Калі вы хочаце скапіяваць дыяпазон ячэек, тады вы можаце прытрымлівацца гэтага метаду.

Крок-01 :

➤Выканайце Крок-01 з Метад-1

9726

Спачатку, Дыяпазон (“A1:A6”) выбярэ дыяпазон A1:A6 , а затым Зрушэнне(4, 1) перасуне ячэйку на 4 радкі ўніз A1 і 1 слупок справа. Пасля гэтага роўная колькасць вочак у дыяпазоне A1:A6 будзе выбрана адсюль.

Нарэшце, ён скапіруе значэнні ў дыяпазоне B5:B10 .

➤Націсніце F5

Вынік :

Пасля гэтага вы змогуць скапіяваць дыяпазон даных у слупок імя студэнта .

Спосаб 9: Выдаленне дыяпазону

Тут, мы пакажам спосаб выдалення шэрагу даных з дапамогай кода VBA .

Крок-01 :

➤Выконвайце Крок-01 з Метад-1

6587

Спачатку Дыяпазон (“F11:F17”) выбярэ дыяпазон F11:F17 , а затым Зрушэнне(-7, -2) перамесціцца на 7 радкоў уверх ад ячэйкі F11 і 2 слупкоў у левы бок. Пасля гэтага адсюль будзе выбрана роўная колькасць ячэек у дыяпазоне F11:F17 .

Нарэшце, гэта выдаліць дыяпазон D4:D10 .

➤Націсніце F5

Вынік :

Такім чынам вы скапіруеце дыяпазон даных у слупку ідэнтыфікатара электроннай пошты .

Метад 10: Выкарыстанне зрушэння дыяпазону VBA для ўводу значэння

Тут, у нас ёсць пустая ячэйка (мы выдалілі значэнне ў гэтай ячэйцы для тлумачэння гэтага метаду) у слупку імя студэнта , і мы хочам запоўніць яе імем Джозэф Майкл . З дапамогай a VBA код мы можам лёгка ўвесці гэта значэнне.

Крок-01 :

➤Выконвайце Крок-01 з Метаду-1

2966

Спачатку Дыяпазон(“A1”) выбярэ ячэйку A1 , а потым Зрушэнне(6, 1) перамесціцца на 6 радкоў уніз ад ячэйкі A1 і 1 слупка ў правы бок. Пасля гэтага будзе выбрана ячэйка B7 і, нарэшце, у гэтую ячэйку будзе ўведзена значэнне «Джозэф Майкл» .

➤Націсніце F5

Вынік :

Такім чынам вы атрымаеце імя Джозэф Майкл у ячэйцы B7 .

Метад-11: Выкарыстанне зрушэння дыяпазону VBA для атрымання вываду

Дапусцім, вы хочаце напісаць Выканана або Не адпавядае імёнам студэнтаў у залежнасці ад слупка "Вынік" , дзе ў дужках напісана Здана або Не праведзена . Каб знайсці гэты падрадок у слупку "Вынік" і запісаць яго ў слупок здаў/не праходзіў выканайце гэты метад.

Крок-01 :

➤Выканайце Крок-01 з Метад-1

1496

Тут дыяпазон ячэек C5:C10 выбіраецца з дапамогай Range(“C5:C10”) , які з'яўляецца слупком Result

InStr(cell. value, «Праход») > 0 гэта ўмова, пры якой лік большы за нуль (калі ячэйка змяшчае «Здана» ), тады наступны радок будзе працягвацца і дасць вывад у суседняй ячэйцы як Здана . Тут суседняя ячэйка будзе вылучана cell.Offset(0, 1) , што азначае, што ён перамесціцца на 1 слупок направа ад ячэйкі ўводу.

Калі ўмова становіцца ілжывай, азначае, што ячэйка не ўтрымлівае “Pass” , тады радок пад Else будзе выкананы і выдасць вываднае значэнне ў суседняй ячэйцы як Failed .

Гэты цыкл будзе працягвацца для кожнай ячэйкі .

➤Націсніце F5

Вынік :

Тады вы атрымаеце выхады Здана або не пройдзена у слупку Здана/Не пройдзена .

Практычны раздзел

Для практыкі самастойна мы далі раздзел Практыка , як паказана ніжэй, на аркушы пад назвай Практыка . Калі ласка, зрабіце гэта самастойна.

Выснова

У гэтым артыкуле я паспрабаваў ахапіць самыя простыя спосабы выкарыстання зрушэння дыяпазону VBA у Excel эфектыўна. Спадзяюся, вы знойдзеце гэта карысным. Калі ў вас ёсць якія-небудзь прапановы або пытанні, не саромейцеся падзяліцца імі з намі.

Х'ю Уэст з'яўляецца вельмі дасведчаным трэнерам і аналітыкам Excel з больш чым 10-гадовым вопытам работы ў галіны. Ён мае ступень бакалаўра ў галіне бухгалтарскага ўліку і фінансаў і ступень магістра дзелавога адміністравання. Х'ю захапляецца навучаннем і распрацаваў унікальны падыход да навучання, які лёгка прытрымлівацца і зразумець. Яго экспертныя веды Excel дапамаглі тысячам студэнтаў і спецыялістаў па ўсім свеце палепшыць свае навыкі і атрымаць поспех у сваёй кар'еры. Праз свой блог Х'ю дзеліцца сваімі ведамі з усім светам, прапаноўваючы бясплатныя падручнікі па Excel і онлайн-трэнінгі, каб дапамагчы прыватным асобам і прадпрыемствам цалкам раскрыць свой патэнцыял.