Садржај

• На корак
• Метод 1 од 3: Изаберите појединачне ћелије
• 2. метод од 3: Изаберите опсеге
• Метод 3 од 3: Изаберите податке у колонама „узастопни“ и „не-узастопни“
• Савети

Овај викиХов вас учи како да користите Висуал Басиц за одабир података у Мицрософт Екцелу. Све док сте упознати са основама ВБ скрипти и употребом напреднијих функција програма Екцел, скрипте за одабир ће вам бити прилично једноставне.

На корак

Метод 1 од 3: Изаберите појединачне ћелије

1. Изаберите ћелију на тренутном радном листу. Претпоставимо да желите да изаберете ћелију Е6 помоћу Висуал Басиц-а. То можете учинити једном од следећих команди:
   

   АцтивеСхеет.Целлс (6, 5) .Одаберите
   

   АцтивеСхеет.Ранге ("Е6"). Изаберите

2. Изаберите ћелију на другом радном листу у истој радној свесци. Рецимо да се наша пример ћелија, Е6, налази на листу званом Схеет2. Да бисте је изабрали, можете користити један од следећих метода:
   

   Апплицатион.Гото АцтивеВоркбоок.Схеетс ("Схеет2"). Ћелије (6, 5)

   Апплицатион.Гото (АцтивеВоркбоок.Схеетс ("Схеет2"). Ранге ("Е6"))

3. Изаберите ћелију на радном листу у другој радној свесци. Рецимо да желите да изаберете ћелију са Схеет1 у радној свесци под називом БООК2.КСЛС. Један од ова два начина треба да функционише:

   Апплицатион.Гото Воркбоокс ("БООК2.КСЛС"). Табеле ("Схеет1"). Ћелије (2,1)

   Апплицатион.Гото Воркбоокс ("БООК2.КСЛС"). Табеле ("Схеет1"). Распон ("А2")

4. Изаберите ћелију у односу на другу ћелију. Помоћу ВБ можете да одаберете ћелију на основу њене локације у односу на активну (или другу) ћелију. Само се уверите да ћелија постоји да бисте избегли грешке. То се ради на следећи начин:
   • Изаберите ћелију три реда испод и четири колоне лево од активне ћелије:

     АцтивеЦелл.Оффсет (3, -4) .Одаберите

   • Изаберите ћелију пет редова испод и четири колоне десно од ћелије Ц7:

     АцтивеСхеет.Целлс (7, 3). Оффсет (5, 4). Селецт

2. метод од 3: Изаберите опсеге

1. Изаберите опсег ћелија на активном радном листу. Да бисте изабрали ћелије Ц1: Д6 на тренутном радном листу, користите један од следећа три метода:

   АцтивеСхеет.Ранге (Ћелије (1, 3), Ћелије (6, 4)). Изаберите

   АцтивеСхеет.Ранге ("Ц1: Д6"). Изаберите

   АцтивеСхеет.Ранге ("Ц1", "Д6"). Изаберите

2. Изаберите серију са другог радног листа у истој радној свесци. Можете користити један од ових примера за бирање ћелија Ц3: Е11 на листу званом Схеет3:

   Апплицатион.Гото АцтивеВоркбоок.Схеетс ("Схеет3"). Ранге ("Ц3: Е11")

   Апплицатион.Гото АцтивеВоркбоок.Схеетс ("Схеет3"). Ранге ("Ц3", "Е11")

3. Изаберите опсег ћелија са радног листа у другој радној свесци. Оба примера треба да изаберу ћелије Е12: Ф12 на листу 1 радне свеске под називом БООК2.КСЛС:

   Апплицатион.Гото Воркбоокс ("БООК2.КСЛС"). Табеле ("Схеет1"). Распон ("Е12: Ф12")

   Апплицатион.Гото Воркбоокс ("БООК2.КСЛС"). Табеле ("Схеет1"). Распон ("Е12", "Ф12")

4. Изаберите именовани опсег. Ако сте опсегу ћелија доделили име, користите исту синтаксу као у корацима 4-6, али замените адресу опсега (нпр. „Е12“, „Ф12“) именом опсега (нпр. „Продаја“) ). Ево неколико примера:
   
   • На активном радном листу:

     АцтивеСхеет.Ранге („Продаја“). Изаберите

   • Други радни лист исте радне свеске:

     Табеле Апплицатион.Гото АцтивеВоркбоок.Схеетс ("Схеет3"). Распон ("Продаја")

   • Остала радна свеска:

     Апплицатион.Гото Воркбоокс ("БООК2.КСЛС"). Табеле ("Схеет1"). Асортиман ("Продаја")

5. Изаберите опсег у односу на именовани опсег. Синтакса варира у зависности од локације поменутог опсега и од тога да ли желите да прилагодите величину новог опсега.
   • Ако је опсег који желите да одаберете исте величине као матрица Тест5 се зове, али померио је четири реда надоле и три колоне удесно, а затим користите следећи код:

     АцтивеСхеет.Ранге ("Тест5"). Оффсет (4, 3). Селецт

   • Ако је опсег на листу 3 исте радне свеске, прво га активирајте, а затим изаберите опсег на следећи начин:

     Табеле („Схеет3“). Активирајте АцтивеСхеет.Ранге („Тест“). Помак (4, 3). Изаберите

6. Изаберите опсег и промените величину избора. По потреби можете повећати величину изабраног опсега. Ако желите да изаберете опсег који База података а затим желите да повећате величину за пет редова, користили бисте ову синтаксу:

   Распон („База података“). Изаберите Селецтион.Ресизе (Селецтион.Ровс.Цоунт + 5, _Селецтион.Цолумнс.Цоунт) .Селецт

7. Изаберите унију две именоване серије. Ако имате два преклапајућа именована опсега, тада можете помоћу ВБ одабрати ћелије у том преклапајућем региону („унија“). Ограничење је то што то можете учинити само на активном радном листу. Рецимо да имате унију опсег позван Добро и један именован Лоше желите да одаберете:

   • Апплицатион.Унион (опсег („добар“), опсег („лош“)). Изаберите

   • Ако желите да одаберете подскуп два поменута опсега уместо преклапајућег подручја, само замените Апплицатион.Унион кроз Примена.Интерсект.

Метод 3 од 3: Изаберите податке у колонама „узастопни“ и „не-узастопни“

1. Користите ове узорке података за примере у овој методи. Овај графикон препун узорака података, љубазношћу компаније Мицрософт, помоћи ће вам да представите како се примери понашају:

   А1: Име	Б1: Продаја	Ц1: Количина
   А2: а	Б2: 10 €	Ц2: 5
   А3: б	Б3:	Ц3: 10
   А4: ц	Б4: 10 €	Ц4: 5
   А5:	Б5:	Ц5:
   А6: Укупно	Б6: 20 €	Ц6: 20

2. Изаберите последњу ћелију на дну суседне колоне. У следећем примеру је изабрана ћелија А4:

   АцтивеСхеет.Ранге ("А1"). Енд (клДовн) .Селецт

3. Изаберите прву празну ћелију испод колоне суседних ћелија. Следећи пример бира А5 на основу горњег графикона:

   АцтивеСхеет.Ранге ("А1"). Енд (клДовн) .Оффсет (1.0) .Селецт

4. Изаберите опсег узастопних ћелија у колони. У оба следећа примера изабран је опсег А1: А4:

   АцтивеСхеет.Ранге ("А1", АцтивеСхеет.Ранге ("а1"). Енд (клДовн)). Изаберите

   АцтивеСхеет.Ранге ("А1:" & АцтивеСхеет.Ранге ("А1"). Енд (клДовн) .Аддресс) .Селецт

5. Изаберите читав низ не-узастопних ћелија у колони. Користећи табелу података на врху ове методе, оба следећа примера ће изабрати А1: А6:

   АцтивеСхеет.Ранге ("А1", АцтивеСхеет.Ранге ("А65536"). Крај (клУп)). Изаберите

   АцтивеСхеет.Ранге ("А1", АцтивеСхеет.Ранге ("А65536"). Крај (клУп)). Изаберите

Савети

• Својства „АцтивеСхеет“ и „АцтивеВоркбоок“ обично се могу изоставити ако се подразумевају активни лист и / или радне свеске.