Как да изберете диапазони с помощта Visual Basic за приложения (примери за начинаещи)

Примери за ръчно избиране на клетки

За да изберете ръчно всички данни в колона, изберете първата клетка и натиснете CTRL+SHIFT+СТРЕЛКА НАДОЛУ.

По същия начин, за да изберете ръчно ред и всички колони, прикачени към реда, натиснете CTRL+SHIFT+СТРЕЛКА НАДОЛУ+СТРЕЛКА НАДЯСНО. Обаче всички данни трябва да са непрекъснати (т.е. не можете да имате празни редове или колони). Освен това можете да изберете текущата област от данни (непрекъснати данни, без празни редове или колони), като направите следното:

1. В менюто Редактиране щракнете върху Отиди на.

2. В диалоговия прозорец Отиди на щракнете върху Специални.

3. В диалоговия прозорец Отиди на специални щракнете върху Текуща област и след това щракнете върхуOK
   .

Можете също да изберете този диапазон с помощта на Visual Basic за приложения.

Забележка Ако се опитате да запишете тази процедура с помощта на програмата за записване на макроси, не получавате същите резултати.

Примери как да използвате Visual Basic, за да изберете клетки в диапазон

Microsoft предоставя примери за програмиране само за илюстрация, без гаранция, изразена или подразбирана. Това включва, но не се ограничава до подразбите гаранции за продаваемост или годност за определена цел. Тази статия предполага, че сте запознати с езика за програмиране, който се демонстрира, и с инструментите, които се използват за създаване и за отстраняване на грешки. Инженерите по поддръжката на Microsoft могат да ви помогнат да обясните функционалността на определена процедура, но те няма да променят тези примери, за да предоставят допълнителна функционалност или да изграждат процедури, за да отговорят на вашите конкретни изисквания. Следващите примери Visual Basic код ви показват как да избирате различни диапазони.

Ако знаете началото на клетката (в този пример началото е клетка C1) и искате да изберете до последната клетка (в същата колона), която има данни, но не знаете този адрес, използвайте следния код:

   Sub SelectRangeDown()
      Range("c1", Range("c1").End(xlDown)).Select
   End Sub

Забележка Макросът SelectRangeDown предполага, че вашите данни са непрекъснати. В противен случай, ако има празни клетки в колоната с данни, които избирате, този макрос може да не избере всички клетки в колоната.

Ако данните ви започват в клетка C1, но не са съседни в тази колона, използвайте следния макрос в Microsoft Office Excel 2003 и в по-стари версии на Excel:

   Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c65536").End(xlUp)).Select
   End Sub

Тъй Microsoft Office Excel 2007 поддържа 1048 576 реда, използвайте следния макрос в Excel 2007:

 Sub SelectRangeDown_Discontiguous()
      Range("c1", Range("c1048576").End(xlUp)).Select
   End Sub

Ако искате да изберете от активната клетка надолу и всички колони надясно (ако имате непрекъснати данни във всички редове и колони), използвайте следния код:

   Sub myrangearea()
      Range(ActiveCell, ActiveCell.End(xlDown).End(xlToRight)).Select
   End Sub

Ако знаете началната клетка (в този примерен код началната клетка е D1) и искате да изберете надолу колоната и отдясно, използвайте следния код:

   Sub RangeFromStart()
      Range("d1", Range("d1").End(xlDown).End(xlToRight)).Select
   End Sub

За да изберете всички данни в текущата област, използвайте следния код:

   Sub CurrentArea()
      Selection.CurrentRegion.Select
   End Sub

Примерите, които са включени в тази статия, ви показват как да изберете различни диапазони в активния работен лист на текущата работна книга.

За допълнителна информация как да изберете диапазони с Visual Basic за приложения (и за по-разширени примери) щракнете върху следния номер на статия в базата знания на Microsoft:

291308 Как да изберете клетки/диапазони, като използвате Visual Basic процедури в Excel