Excel VBA для выбару выкарыстоўванага дыяпазону ў слупку (8 прыкладаў)

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

Гэты падручнік прадэманструе 8 прыкладаў выкарыстання VBA для выбару Выкарыстанага дыяпазону ў слупку ў excel. Як правіла, уласцівасць UsedRange у excel прадстаўляе частку аркуша, на якой ёсць даныя. Каб наглядна праілюстраваць прыклады, мы будзем прымяняць уласцівасць UsedRange у пэўным наборы даных для ўсіх прыкладаў.

Спампаваць практычны сшытак

Мы можам спампаваць практычны сшытак адсюль .

VBA для выбару UsedRange у Column.xlsm

8 простых прыкладаў VBA для выбару UsedRange у Column

На наступным малюнку , мы можам убачыць набор даных, які будзем выкарыстоўваць для ўсіх прыкладаў. Набор даных змяшчае імёны прадаўцоў , іх размяшчэнне , рэгіён і « агульную суму » продажаў. У гэтым наборы даных выкарыстоўваны дыяпазон будзе ўлічвацца, уключаючы загаловак. Такім чынам, дыяпазон, які выкарыстоўваецца ў наступным наборы даных: ( B2:E15 ).

1. Выберыце UsedRange у слупку з дапамогай VBA ў Excel

Перш за ўсё, мы абярэм усе слупкі з нашага набору даных. Для гэтага мы будзем выкарыстоўваць уласцівасць VBA select UsedRange у слупках. Давайце паглядзім этапы выканання гэтага метаду.

КРОКІ:

  • Для пачатку пстрыкніце правай кнопкай мышы на актыўным аркушы з назвай ' Select_Columns '.
  • Акрамя таго, абярыце опцыю ' Праглядзець код '.

  • Тады апісанае вышэй дзеянне адкрывае пустое поле VBA акно кода для гэтага аркуша. Мы таксама можам атрымаць гэтае акно кода, націснуўшы Alt + F11 .
  • Далей увядзіце наступны код у гэтым акне кода:
2372
  • Пасля гэтага націсніце Выканаць або націсніце клавішу F5 , каб запусціць код.

  • Нарэшце, мы атрымліваем вынік, як на наступным малюнку. Мы бачым, што выкарыстоўваны дыяпазон у слупках з нашага набору дадзеных зараз выбраны.

2. Выкарыстоўвайце VBA, каб скапіяваць увесь UsedRange у слупок

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

КРОКІ:

  • Спачатку перайдзіце на ўкладку актыўнага працоўнага ліста з назвай « Капіяваць '.
  • Далей пстрыкніце правай кнопкай мышы на гэтай укладцы і абярыце опцыю « Праглядзець код ».

  • Гэта адкрые пустое акно VBA кода для бягучага аркуша. Іншы спосаб атрымаць гэтае акно - націснуць Alt + F11 з клавіятуры.
  • Затым устаўце наступны код у гэтае акно кода:
5406
  • Цяпер, каб запусціць код, націсніце кнопку Выканаць або націсніце клавішу F5 .

  • Нарэшце, мы бачым наступны вынік. Акрамя таго, мы бачым мяжу вакол выкарыстоўванага дыяпазону. Гэта азначае, што код скапіяваў дадзеныяўнутры гэтай мяжы.

Больш падрабязна: Excel VBA: капіяванне дынамічнага дыяпазону ў іншую працоўную кнігу

3. Колькасць лікаў слупкоў у UsedRange з выкарыстаннем VBA

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

КРОКІ:

  • Спачатку абярыце актыўны аркуш з назвай « Count_Columns ».
  • Па-другое, пстрыкніце правай кнопкай мышы на назве актыўнага аркуша і націсніце опцыю « Праглядзець код ».

  • Каманда вышэй адкрывае пустое акно кода VBA для актыўнага аркуша. Мы таксама можам атрымаць акно кода, націснуўшы Alt + F11 з клавіятуры.
  • Па-трэцяе, увядзіце наступны код у гэтае пустое акно кода:
8308
  • Далей націсніце на Выканаць або націсніце клавішу F5 , каб запусціць код.

  • Нарэшце, мы атрымліваем вынік у акне паведамлення. Колькасць слупкоў у выкарыстоўваным дыяпазоне складае 4 .

Больш падрабязна: Як выкарыстоўваць VBA для падліку радкоў у дыяпазоне з дадзенымі ў Excel (5 макрасаў)

4. Excel VBA для падліку колькасці апошняга слупка ў выкарыстаным дыяпазоне

У папярэднім метадзе мы вынялі нумар апошняга слупка ў выкарыстоўваны дыяпазон.Аднак у гэтым прыкладзе мы вызначым нумар апошняга слупка ў выкарыстоўваным дыяпазоне на ўсім аркушы з дапамогай уласцівасці VBA select UsedRange . Давайце паглядзім крокі, якія мы павінны выканаць, каб выканаць гэта дзеянне.

КРОКІ:

  • Для пачатку пстрыкніце правай кнопкай мышы на актыўным аркушы з назвай « Апошні слупок ».
  • Далей абярыце опцыю « Праглядзець код ».

  • Такім чынам, прыведзеная вышэй каманда адкрывае пустое акно VBA кода для гэтага аркуша. Альтэрнатыўны спосаб адкрыць гэтае акно кода - націснуць Alt + F11 .
  • Пасля гэтага ўстаўце наступны код у гэтае акно кода:
9180
  • Цяпер націсніце кнопку Выканаць або націсніце клавішу F5 , каб запусціць код.

  • У рэшце рэшт, мы атрымліваем вынік у акне паведамлення. Апошні слупок у выкарыстоўваным дыяпазоне - гэта 5-ы слупок аркуша.

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

  • Як выкарыстоўваць VBA для кожнага радка ў дыяпазоне ў Excel
  • Выкарыстоўваць VBA для выбару дыяпазону з актыўнай ячэйкі ў Excel (3 метады)
  • Макрас Excel: сартаванне некалькіх слупкоў з дапамогай дынамічнага дыяпазону (4 метады)

5. Выберыце апошнюю ячэйку апошняга слупка з UsedRange з дапамогай VBA

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

КРОКІ:

  • Спачатку абярыце актыўны аркуш з назвай « Апошняя_ячэйка '.
  • Далей, пстрыкніце правай кнопкай мышы на назве аркуша. Выберыце опцыю « Праглядзець код ».

  • Затым мы атрымаем пустое акно кода VBA . Акрамя таго, мы можам націснуць Alt + F11 , каб адкрыць гэтае акно кода.
  • Пасля гэтага ўвядзіце наступны код у гэтым акне кода:
7910
  • Цяпер, каб запусціць код, націсніце Выканаць ці націсніце F5 .

  • Нарэшце, мы бачым вынік на наступным малюнку. Выбраная апошняя ячэйка апошняга слупка - гэта ячэйка E15 .

6. Знайдзіце дыяпазон ячэек выбранага UsedRange з дапамогай Excel VBA

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

КРОКІ:

  • У пачатку пстрыкніце правай кнопкай мышы на ўкладцы актыўнага аркуша пад назвай « Знайсці дыяпазон вочак ».
  • Па-другое, абярыце опцыю « Праглядзець код ».

  • Гэта адкрые пустое акно кода VBA . Іншы спосаб адкрыць гэтае акно кода - націснуць Alt + F11 .
  • Па-трэцяе, увядзіце наступны код у гэтае акно кода:
4741
  • Затым, каб запусціць код, націсніце Выканаць або націсніце клавішу F5 .

  • У рэшце рэшт, акно паведамлення, як наступны малюнак паказвае вынік.

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

  • VBA для прагляду радкоў і Слупкі ў дыяпазоне ў Excel (5 прыкладаў)
  • Як пераўтварыць дыяпазон у масіў у Excel VBA (3 спосабы)

7. Уставіць Уласцівасць VBA UsedRange для падліку пустых вочак

У гэтым прыкладзе мы будзем выкарыстоўваць уласцівасць VBA select UsedRange для падліку пустых вочак у аркушы Excel. Часам у выкарыстоўваным дыяпазоне нашага набору даных могуць быць пустыя вочкі. Мы можам лёгка падлічыць колькасць гэтых пустых вочак, выкарыстоўваючы ўласцівасць UsedRange . Давайце паглядзім крокі для выканання гэтага прыкладу.

КРОКІ:

  • Спачатку пстрыкніце правай кнопкай мышы на актыўнай укладцы аркуша з назвай ' Пустыя_ячэйкі '.
  • Далей выберыце опцыю « Праглядзець код ».

  • Апісанае вышэй дзеянне адкрывае пустое акно кода VBA . Альтэрнатыўны спосаб адкрыць гэтае акно кода - націснуць Alt + F11 .
  • Затым устаўце наступны код у гэтае акно кода:
3642
  • Пасля гэтага націсніце Выканаць або націсніце клавішу F5 , каб запусціць код.

  • Нарэшце, мы атрымаем вынік у акне паведамлення. Theакно паведамлення будзе адлюстроўваць агульную колькасць вочак і пустых вочак у нашым выкарыстоўваным дыяпазоне.

8. VBA UsedRange для пошуку першай пустой ячэйкі ў слупку ў Excel

У апошнім прыкладзе мы будзем выкарыстоўваць excel VBA для выбару ўласцівасці Used Range у слупку, каб знайсці першую пустую ячэйку ў нашым аркушы Excel. Гэты метад дазволіць знайсці першую пустую ячэйку пэўнага слупка. Пустая ячэйка заўсёды будзе знаходзіцца па-за выкарыстоўваным дыяпазонам набору даных. Такім чынам, калі якая-небудзь ячэйка пустая або пустая ў выкарыстоўваным дыяпазоне, яна не будзе ўлічвацца ў гэтым метадзе. Цяпер выканайце наступныя дзеянні, каб выканаць гэты метад.

КРОКІ:

  • Для пачатку пстрыкніце правай кнопкай мышы на актыўным укладка аркуша з назвай ' First_Empty '.
  • Акрамя таго, абярыце опцыю ' Праглядзець код '.

  • Гэта адкрые пустое акно кода VBA . Мы таксама можам націснуць Alt + F11 , каб адкрыць гэтае акно кода.
  • Акрамя таго, увядзіце наступны код у пустое акно кода VBA :
2340
  • Затым, каб запусціць код, націсніце кнопку Выканаць ці націсніце клавішу F5 .

  • Нарэшце, прыведзены вышэй код уставіць значэнне ' FirstEmptyCell ' у ячэйку E16 . Гэта першая пустая ячэйка слупка E пасля выкарыстоўванага дыяпазону набору даных.

Больш падрабязна: Excel VBA для Пракруціць дыяпазон да пустой ячэйкі (4 прыклады)

Выснова

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

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